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This publication could contain technical inaccuracies or 
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SUMMARY OF AMENDMENTS 



Terminal Support 



Terminal support information for the 3101 Display Termi 
nal (Models 1 and Model 2) was added to Chapter 1. 



Multiple Terminal Manager 



Chapter 5 has been modified for PL/I and 3101 Display 
Terminal as provided by the Multiple Terminal Manager. 
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Remote Management Utility (Version 2 only) 



Chapter 6 is a new chapter that describes the Remote 
Management Utility. 



Bi bli ography 



The Bibliography lists the books in the Event Driven 
Executive library and a recommended reading sequence. 
Other publications related to the Event Driven Executive 
are also listed. 



Miscellaneous Changes 



This manual has been modified to include new function 
and to improve technical accuracy and clarity. Addi- 
tional material and technical changes are indicated by 
vertical bars in the left margin. 
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HOW TO USE THIS BOOK 



The material in this section is a guide to the use of this book. 
It defines the purpose* audience, and content of the book as 
well as listing aids for using the book and background materi- 



als . 
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PURPOSE 



The IBM Ser i es/1 Event Driven Executive Communications and 
Terminal Applications Guide , SC34-0316 describes how to use 
the Event Driven Executive to communicate with interactive 
devices, such as, terminals or other processors. 

This manual provides extensions to the System Guide , the 
Utilities, Operator Commands, Program Preparation, Messages 
and Codes , and the Language Reference manuals. 



AUDIENCE 



This book is written for system and application programmers 
with considerable knowledge in BSC and host operation, includ- 
ing IBM and non-IBM communications hardware. 

To write applications for remotely attached devices, you must 
be familiar with line control procedures. Experience in pro- 
gramming realtime programs in the Event Driven Language is 
required. Experience coding programs in assembler language for 
the Series/1 will enable you to extend the terminal application 
capabilities of the system. 
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HOW THIS BOOK IS ORGANIZED 

This book is organized into two parts. The first part explains 
criteria for selecting communications methods or techniques 
available with the Event Driven Executive system. The second 
part consists of individual chapters which describe how to 
design particular communication techniques. 
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The topics covered in part two include: 
Terminal Support 

Binary Synchronous Communications 
Host Communications Facility 
Multiple Terminal Manager 
Remote Management Utility 
Graphics 

EXAMPLES AND OTHER AIDS 



Throughout this book, coding examples and illustrations are 
used to clarify coding techniques and requirements. Coding 
examples are fully executable portions of complete programs 
that may be entered as they are shown. Coding illustrations are 
non-executable portions of incomplete programs that show the 
correct format of all required parameters on a statement. Miss- 
ing code, or code provided by you, is indicated by a series of 
vertical or horizontal dots. 

Several other aids are provided to assist you in using this 
book : 

• A Summary of Amendments lists the significant changes made 
to this publication since the last edition 

• A B i b 1 i ography : 

Lists the books in the Event Driven Executive library 
along with a brief description of each book and a 
recommended reading sequence 

- Lists related publications and materials 

• A Glossary which defines terms 

• A Common Index which includes entries from each book in the 
Event Driven Executive library 

References to other manuals are made throughout this manual 
using shortened titles. For the full title and order number of 
manuals mentioned in the text, see the Bibliography. 
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RELATED PUBLICATIONS 



Related publications are listed in the Bibliography 






SUBMITTING AN APAR 

If you have a problem with the Series/1 Event Driven Executive 
services* you are encouraged to fill out an authorized program 
analysis report (APAR) form as described in the IBM Series/1 
Authorized Program Analysis Report (APAR) User's Guide, 
GC34-0099. 
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INTRODUCTION 



The Event Driven Executive can be used to interact with a vari- 
ety of terminals. Various techniques are available using the 
Event Driven Executive. These techniques support applications 
ranging from simple applications interacting with a single 
terminal to complex communications networks. This book con- 
tains both the information you need to understand which Event 
Driven Executive technique is best suited for your particular 
application and* the information needed to design your appli- 
cation using the technique selected. 

These techniques are: 



Terminal Support 

Binary Synchronous Communication Access Method (BSCAM) 

Host Communications Facility 

Multiple Terminal Manager 

Remote Management Utility 

Graph i cs 

Uti lities 



Introduct i on 
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PART I - TECHNIQUE SELECTION CRITERIA 



This part of the book lists and briefly describes the tech- 
niques supported by the Event Driven Executive. The informa- 
tion in this part of the book allows you to see what is 
available and to select the technique best suited for your par- 
ticular application. 
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CHAPTER 1. TECHNIQUES AVAILABLE USING THE EVENT DRIVEN EXEC- 
UTIVE 



This chapter describes the techniques available using the 
Event Driven Executive. The information in this chapter will 
help you select the technique best suited to your application. 



TERMINAL SUPPORT 

This technique is the basic Event Driven Executive terminal 
support and should be selected if you are writing an Event 
Driven Language program which will interact with a single ter- 
minal. See Figure 1 on page 6 for supported terminals. Use of 
this facility will also allow the Event Driven Language program 
to interact with another Event Driven Language program. The 
interaction with another Event Driven Language program is 
known as virtual terminal support. For information on the vir- 
tual terminal support, refer to "Virtual Terminal Communi- 
cations" in the System Gu i de . 

Using the terminal support, you interact with the terminal in 

C either field or line mode. If the terminal is a supported 

) display, the interaction may also be in full screen mode. For 

information on the full screen mode support, refer to "Defining 
and Accessing Logical Screens" in the System Guide . 
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The following figure lists the devices and features which are 
supported by the Event Driven Executive. 



/T~ 



Device (or equiv 


IBM 


2741 


IBM 


4973 


IBM 


4974 


IBM 


4978 


IBM 


4979 


IBM 


Ser i es/1 


IBM 


5100 


IBM 


5110 


IBM 


3101 


ASCII terminal* 



or, 2091 with 
with 2096 or, 
or, 2091 with 
with 2096 or, 



2092 or, 
7850 

2092 or, 
7850 



>nt) Attach Via Series/1 
Control ler/Adapter 
Feature Number 
1610 
5630 
5620 

RPQ D02038 
3585 
1610 
1610 
1610 
1610 
2095 
1610 
2095 
Graphics terminal** 1560 

*Teletype 1 ASR 33/35 (TTY) or equivalent 
**Tektronix 2 Model 4013 or equivalent 



1560 - Integrated Digital Input/Output Non-Isolated 

1610 - Asynchronous Communications Single Line Controller 

2091 - Asynchronous Communications Eight Line Controller 

2092 - Asynchronous Communications Four Line Adapter 

2095 - Feature Programmable Eight Line Controller 

2096 - Feature Programmable Four Line Adapter 
3585 - 4979 Display Station Attachment 

5620 - 4974 Printer Attachment 

5630 - 4973 Line Printer Attachment 

7850 - Teletypewriter Adapter 

RPQ D02038 - 4978 Display Station Attachment 
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Figure 1. Supported Devices and Features 



Trademark of Teletype Corporation 
Trademark of Tektronix, Inc. 
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Terminology for Supported Terminals 



The following is a definition of terminologies used in describ- 
ing Event Driven Executive supported terminals. This terminol- 
ogy is also used to describe the coding of the TERMINAL 
statement during system generation time which is discussed in 
the System Guide . 



Term i no logy 
ASCI I Terminal 



Def i n i t i on 

Any device which attaches via #7850, 
#1610, #2091 with #2092, or #2095 
with #2096 adapters. (Teletypewriter, 
Asynchronous Single Line, Asynchronous 
Multiline, and Feature Programmable 
adapters respectively) and uses code 
type ASCII or EBASC. 



ACCA Terminal 



An ASCII terminal attached via #1610, 
#2091 with #2092, or #2095 with #2096 
adapters . 



Mi rror Image 
ACCA Terminal 



An ACCA terminal attached via #1610 or 
#2091 with #2092 using code type EBASC 



Real Image 
ACCA Terminal 



An ACCA terminal attached via #2095 
with #2096 using code type ASCII. 



TTY 



Any Teletype ASR 33/35 or compatible 
terminal attached via #7850 only. 



2741 Termi nal 



A terminal attached via #1610 using 
code type CRSP or EBCD. 



PROC 



A terminal attached via #1610 using 
code type EBCDIC. 



Note: Appendix A of this book contains all the code types men- 
tioned in the previous text. 
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The following table shows the different device configurations. 

System 
Device Code Local/ Control/ Configuration 
Class Type Remote Adapter Device Type Device 



Di splay 


Graphics 


Local 


#1560 


4013 


4013 


Di splay 


ASCII 


Remote 


#2095 

with 

#2096 


ACCA 


3101 


Di splay 


Mi rror 

Image 

ASCII 


Remote 


#1610 

or 
#2091 
with 
#2092 


ACCA 


3101 


Display 


EBCDIC 


Loca 1 


RPQ 
D02038 


4978 


4978 


Display 


EBCDIC 


Local 


#3585 


4979 


4979 


Display 


ASCII 


Loca 1 


#7850 


TTY 


3101 


Pr i nter 


ASCII 


Local 


#7850 


TTY 


Teletype 


Printer 


Real 

Image 

ASCII 


Remote 


#2095 

wi th 

#2096 


ACCA 


Te letype 


Printer 


Mirror 

Image 

ASCII 


Remote 


#1610 

or 
#2091 
with 
#2092 


ACCA 


Teletype 


Printer 


CRSP 


Remote 


#1610 


2741 


2741 


Pr i nter 


EBCD 


Remote 


#1610 


2741 


2741 


Pr i nter 


EBCDIC 


Local 


#5620 


4974 


4974 


Pr i nter 


EBCDIC 


Local 


#5630 


4973 


4973 


Program 


EBCDIC 


Local 


n/a 


VIRT 


Ser i es/1 


Program 


EBCDIC 


Remote 


#1610 


PROC 


Ser i es/1 


Program 


EBCD 


Remote 


#1610 


PROC 


5100/5110 


Program 


CRSP 


Remote 


#1610 


PROC 


5100/5110 
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BINARY SYNCHRONOUS COMMUNICATIONS ACCESS METHOD (BSCAM) 



The binary synchronous communications access method technique 
should be selected when interacting with remotely connected 
terminals or CPUs using the binary synchronous communications 
facility. The remote terminals and CPUs may be any which sup- 
port the BSC protocol. In order to use this technique, the con- 
nection must be via a BSC line. The Event Driven Language 
support allows you to write programs which send and receive 
data consistent with the BSC protocol on the line. This support 
also provides IBM utilities or, IBM supplied applications, 
which have general applicability. These utilities are 2780 and 
3780 RJE emulators and aids for the debugging of programs which 
use binary synchronous communications. 



HOST COMMUNICATIONS FACILITY 



The Host Communications Facility allows you to send/receive 
data sets and background jobs to/from a host system. It 
requires the Host Communications Facility Installed Users Pro- 
gram (IUP) (5796-PGH) be installed on the host S/370 system. 
This technique provides Event Driven Language instructions and 
a utility (SHCFUT1) to provide interactive communications 
between a S/370 host and remote Series/1 over a binary synchro- 
nous communications facility. The Host Communications Facility 
utilizes the BSCAM support to perform its functions. 



MULTIPLE TERMINAL MANAGER 



The Multiple Terminal Manager support should be selected when 
the requirement is to support a transaction-oriented applica- 
tion. A transaction-oriented application is one which consists 
of several terminals, each of which may request concurrent 
interaction with one or more programs. The Multiple Terminal 
Manager manages the Series/1 storage area to reduce the amount 
of storage required to support interaction with more than one 
terminal by one program. High-level language support is pro- 



v i ded . 



REMOTE MANAGEMENT UTILITY 



The Remote Management Utility support should be selected when 
the requirement is to provide remote Series/1 processing for a 
host computer. The Remote Management Utility provides a means 
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of distributed processing on a remote Series/1, with little or 
no operator intervention required. The Remote Management Util- 
ity and the host communicate via a user-written host program 
over a BSC line using the BSCAM support of the Event Driven 
Execut i ve . 



GRAPHICS 



This support should be selected when the application has a 
requirement for graphics support. This technique enables you 
to communicate with a Tektronix Model 4013 (or equivalent) ter- 
minal. The physical connection is via the #1560 adapter. In 
addition to the basic terminal support statements available, 
graphics-oriented Event Driven Language statements and IBM 
utilities are provided. 



UTILITIES 



Various IBM utilities are supplied to ease the burden of data 
transmission to/from interacting devices. These utilities are 
described in the appropriate sections and are? 

• Terminal support (see Utilities, Operator Commands, 
Program Preparation, Messages and Codes ) 

SIMAGE 

SFONT 

SPFMAP 

$TERMUT1 

$TERMUT2 

$TERMUT3 

• BSCAM (see Chapter 3) 



V. 



$PRT2780 
SPRT378Q 
$RJE2780 
$RJE3780 



$BCSUT1 
$BSCUT2 



Host Communications Facility (see Chapter 4) 

SHCFUT1 

Graphics (see Chapter 7) 

$DIUTIL 
SDICOMP 
$DIINTR 
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PART II - TECHNIQUE DESIGN INFORMATION 



This part of the book describes in detail the different tech- 
niques supported by the Event Driven Executive. After you have 
selected the technique which best suits your application* you 
can design your application using the information provided in 
this part of the book. 
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CHAPTER 2. TERMINAL SUPPORT 



The Event Driven Executive terminal support is designed to be 
as device independent as possible. With few exceptions* you 
need not be concerned with what type of device is being driven 
by terminal functions coded in the program. The same sequence 
of terminal output instructions) for instance, can be used to 
print data on a matrix or line printer, on a locally attached 
teletypewriter device, on a remote 2 741 terminal, or to display 
the data on an electronic display screen device. 

Terminals are defined in the system with the TERMINAL system 
configuration statement. This statement generates system 
control blocks and tables that contain the logical and physical 
variables required to operate the terminal. 

The high degree of device independence is achieved in part by 
treating all terminals as though they were line printers, 
differing only in their page sizes (forms length) and margin 
settings, which are defined by TERMINAL statement operands. 
The support provides instructions allowing interactive commu- 
nications between you and your application programs. See 
Figure 1 on page 6 for a list of supported terminals. 

Generally, you can write terminal I/O functions in an applica- 

C\ tion program without concern for the actual terminal being 

J used. The default terminal to be used by the program is dynam- 

ically assigned by the supervisor to be the same terminal that 
was used to initially invoke the program. Therefore, the termi- 
nal assigned can vary from one program invocation to the next, 
with little or no program change. Utilizing the terminal 
instructions, any application program that contains no device 
dependent information can be operated in a compatible manner 
from any Event Driven Executive supported terminal. 

Terminals can be referenced by symbolic name and accessed by 
any application program .through appropriate instructions. 
Forms and screen format control can be dynamically changed 
within your program and the 4978/4979 screen can be copied to 
any designated hard copy terminal. 
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Terminal Operations 



When a program is loaded from a terminal* that terminal is 
dynamically designated by the system as the terminal to be used 
by terminal I/O instructions in the program. Each terminal I/O 
instruction automatically has exclusive use of the terminal 
while executing* and can request extended control for multiple 
I/O operat i ons . 



If more than one task is using the terminal* terminal oper- 
ations from different tasks could become interspersed. When 
this is not desirable* you can specify the ENQT (enqueue termi- 
nal) instruction to reserve the terminal for the exclusive use 
of a task* thereby preventing other tasks from using the termi- 
nal until the task issuing the ENQT releases it with the DEQT 
(dequeue terminal) instruction. 

You can also use ENQT to gain exclusive control of any other 
terminal. The symbolic name of a terminal is the name coded on 
the label of the TERMINAL statement that defines the device. 




Three symbolic terminal names are used by the supervisor for 
system utility programs: 



\^-;S 



$SYSLOG Names the system logging device or operator station* 
and must be defined in every system. In the starter 
supervisor* $SYSLOG defines an IBM 4978 or an IBM 
4979 Display Station. 



$SYSLOGA Names the 



alternate system logging service. If 
unrecoverable errors prevent use of $SYSLOG» the 
system will use the $SYSLOGA terminal as the system 
logging device/operator station. If defined* this 
device should be a terminal with keyboard capabili- 
ty* not just a printer. The starter 
defines the $SYSLOGA terminal as 
device. 



super v i sor 
teletypewriter 



$SYSPRTR Names the system printer. If defined* the output 
from some system programs is directed to this 
device. The starter supervisor defines a 4974 matrix 
printer as the $SYSPRTR device. 
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Terminal I/O Instructions 






The Event Driven Language terminal I/O instructions are pro- 
vided to control the input/output operations to terminals. 
These instructions are defined in the Language Reference and 
are J 

DEQT Releases a terminal from exclusive use 

ENQT Acquires exclusive access to a terminal 

ERASE Clears designated portions of static type screens 

GETVALUE Reads one or more integer values that are entered by 
the terminal operator 

PRINDATE Prints the date on the terminal 

PRINTNUM Converts a floating-point variable or integer 
variable to printable form and writes it on the ter- 
minal, with an optional format specification 

PRINTEXT Writes an alphameric text string to a terminal* with 
or without forms control 

PRINTIME Prints the time of day on the terminal 

QUESTION Prints a message and queries the operator for a Y 
(yes) or N (no) reply 

RDCURSOR Acquires the cursor position of static screens 

READTEXT Reads an alphameric text string from the terminal 

TERMCTRL Controls device dependent features 
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Data Formatting Instructions 

Data formatting instructions allow you to prepare formatted 
data for display on the terminals or printers attached to the 
Series/1. The capability is provided to format data in storage 
and then allow the program to decide the destination. 

Use of the data formatting instructions FORMAT* GETEDIT, and 
PUTEDIT require that the user's object program be processed by 
the link edit program* $LINK, in order to include the supervi- 
sor interface routines and the formatting routines which are 
supplied as object modules. Refer to the Utilities* Operator 
Commands* Program Preparation* Messages and Codes for the 
description of the autocall option of $LINK* and information on 
the use of the "AUTO=$AUTO, ASMLIB" option of SLINK. 

These instructions are defined in the Language Reference and 
are * 

CONVTB Converts a binary value to an EBCDIC string. 

CONVTD Converts an EBCDIC string to a binary value. 

FORMAT Describes the conversion performed between internal 
and external representations of data items. 

GETEDIT Receives data from a terminal using FORMAT. 

PUTEDIT Sends data to a terminal using FORMAT. 

Terminal Definition Functions 






Two Event Driven Language statements are provided to define the 
type of terminal the program is connected to. These are: 

TERMINAL A system configuration statement to define the 
existence of the terminal to the Event Driven Execu- 
tive supervisor. This statement is defined in the 
System Guide. 



IOCB 



Used in a program to define the variable attributes 
of a terminal* such as margins* and to supply the 
symbolic name of the TERMINAL statement supplied 
during system configuration. This statement is 
defined in the Language Reference . 
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Interrupt Processing Functions 




exists to define asynchronous attention interrupt routines via 
the ATTNLIST instruction. When the Attention key is pressed on 
a terminal, the system will query the operator for a command. 
If this command is specified on the ATTNLIST statement* control 
is given to the appropriate program. These two instructions are 
defined in the Language Reference : 

WAIT KEY - Wait for operator response. 

ATTNLIST - Defines asynchronous attention interrupt routine 

See the Language Reference for a full discussion and sample 
programs illustrating the use of the terminal support tech- 
nique. 



o 



Considerations for Feature #1610 or #2091 with 82092 Adapter 

Devices attached via the #1610 controller or #2091 controller 
with #2092 adapters are supported by the standard terminal I/O 
instructions. The adapters operate in half-duplex mode and 
require special attention to the operating environment. Com- 
pared to the Event Driven Executive implementation of the #7850 
adapter, the following differences are noted: 

• Half-duplex mode 

• No Series/1 Echo (must use Local Echo on terminal) 

• Uses eight-bit data interchange code 
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Some general rules for hardware jumpers are: 
• For Direct Connect terminals: 

Data Terminal Ready (DTR) is usually jumpered. 

- Request to Send (RTS); jumper only when Carrier Detect 
(CD) is not provided by terminal. 

- Carrier Detect (CD); jumper only when Request to Send 
(RTS) is provided by the terminal. 



• For Leased Lines using modems: 

- Data Terminal Ready (DTR); jumper only when Event 
Driven Executive application programs do not control 
the modem . 

- Request to Send (RTS); jumper only if the modem pro- 
vides a steady Clear to Send (CTS) signal. 

Carrier Detect (CD); jumper only if the modem supports 
this feature . 

• For Switched Lines using modems: 

- Data Terminal Ready (DTR); jumper only when Event 
Driven Executive application programs do not control 
the modem . 

- Request to Send (RTS); jumper only if the modem pro- 
vides a steady Clear to Send (CTS) signal. 

- Carrier Detect (CD); jumper only if the modem supports 
this feature . 

Speed range jumpers should be installed in accordance with 
instructions in the Communications Feature Description . 

Once the hardware features have been properly defined, you may 
define the features to the Event Driven Executive system. The 
TERMINAL statement is used for this description. Additionally, 
the TERMCTRL statement has operands which allow the control of 
the modem. See the System Gu i de for information on the TERMINAL 
statement and the Language Reference for the TERMCTRL state- 
ment . 
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The TERMCTRL operands are as follows: 



RING 



Waits until the Ring Indicator (RI) is presented to 
the Series/1 from the modem. No timeout is provided. 



RINGT 



**. 



ENABLE 



ENABLET 



ENABLEA 



ENABLEAT 



DISABLE 



Waits until the Ring Indicator (RI) is presented to 
the Series/1 from the modem. If no Ring Indicator 
(RI) occurs after 60 seconds* then the instruction 
is terminated and an error condition is returned to 
the application program in the first word of the task 
control block (TCB). 

Activates Data Terminal Ready (DTR) if it is not 
already jumpered on and then waits for Data Set Ready 
(DSR) to be returned by the modem. No timeout is pro- 
v i ded . 

Activates Data Terminal Ready (DTR) if it is not 
already jumpered on and then waits for Data Set Ready 
(DSR) to be returned by the modem. If Data Set Ready 
is not returned within 15 seconds* then the 
instruction is terminated and an error condition is 
returned to the application program in the first 
word of the TCB. 

Provides the same function as ENABLE except that an 
answer tone is activated for 3 seconds following the 
activation of Data Set Ready (DSR). The modem must 
allow for the control of the answer tone. 



Prov i des the 
comb i ned . 



same function as ENABLET and ENABLEA 



Disables Data Terminal Ready (DTR) if it is not 
jumpered on and waits for 15 seconds. Use this func- 
tion to hang up the modem. 



Return Codes 

After each I/O instruction issued by the Event Driven Executive 
application program* a return code is provided in the first 
word (task name) of the TCB. These return codes have special 
meaning for terminals attached via #1610 controller, #2091 
controller with #2092 adapters and #2095 controller with #2096 
adapters . 
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-1 



Successful completion. 



Bit 



Descr i pt i on 



Unused 

1-8 ISB of last operation (I/O complete) 

9-10 Unused 

11 1 if a write or control operation (I/O complete) 

12 Read operation (I/O complete) 

13 Unused 

14-15 Condition code +1 after I/O start (or) 
Condition code after I/O complete 



Figure 2. Terminal I/O - ACCA Return Codes 



If any error has occurred after I/O complete* then the cycle 
steal status information is also available at #CCBSTW0, 
#CCBSTW1 and #CCBSTW2. If the supervisor is mapped into your 
partition, you can obtain the three cycle steal status words by 
coding the following instructions: 



SAVE 



COPY 
COPY 



MOVE 
MOVE 



DATA 



PROGEQU 
CCBEQU 



#1,$PRGCCB GET ADDRESS OF CCB 

SAVE, (#CCB-#CCBSTW0,#1),3 MOVE STATUS 



3F'0 ? 



w 



Refer to the Communications Feature Description for a detailed 
description of the Interrupt Status Byte (ISB) Condition Codes 
both after start I/O and after I/O complete as well as the mean- 
ing of the cycle steal status words 1, 2, and 3. 
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o 



Considerations for Feature 82095 with 82096 Adapter 



The Event Driven Executive system includes support for the Fea- 
ture Programmable Controller and Adapter. The #2095 controller 
with #2096 adapter has two modes of operation: 

• Compatibility mode - allows the substitution of #2095 con- 
troller with #2096 adapter for current asynchronous commu- 
nication features (#1610 controller and #2091 controller 
with #2092 adapter using eight bit interchange code). 

• EXIO mode - provides access to the full command set. 

In compatibility mode the difference between the #1610 con- 
troller and the #2091 controller with #2092 adapter is that the 
line code is ASCII. This is of particular importance during 
system configuration because the line control characters spec- 
ified on the TERMINAL statement are not coded in mirror image* 
but in standard ASCII. The line code (CODTYPE) must also be 
specified as ASCII. Refer to the System Gu i de for details and a 
definition of mirror image. 



o 



87850 Teletypewriter Adapter 

The most frequent use of the #7850 Teletypewriter Adapter sup- 
port is to receive or send messages composed of ASCII character 
strings between the Series/1 and a teletypewriter terminal. 
The most common forms of such terminals are keyboard/printer 
and keyboard/CRT type display configurations. However* use of 
the terminal I/O instructions need not be limited to these 
types of terminals. 

Devices are available from many vendors which are compatible 
with the physical transmission methods of the Series/1 Tele- 
typewriter Adapter* for example* Isolated Contact sense* TTL* 
and EIA. Such devices include terminals which transmit only* or 
receive only, or transmit only in response to being polled for 
information. The devices may not have keyboards for informa- 
tion input but may acquire data from bar code scanners, analog 
or digital input features within the device, etc. The trans- 
mission code employed by these devices may be alpha m eric ASCII 
characters or may be any of the 256 possible 8-bit character 
comb i nat i ons . 

Proper use of the terminal I/O instructions enables your pro- 
gram to communicate with many such devices. For example* if the 
device attached to the #7850 Teletypewriter Adapter does not 
expect the data which it transmits to be returned by the 
Series/1 (usually returned for printing purposes)* then the 
ECH0=N0 parameter on the appropriate TERMINAL statement should 
be coded . 
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Further* the device data transmission to the Series/1 may 
include bit combinations which match the LINEDEL and CHARDEL 
parameter characters defined on the TERMINAL statement. To 
receive these characters as data in your program* the READTEXT 
instruction must specify the parameter XLATE=NO. Using 
XLATE=NO will permit the reception, as data, of any 8-bit pat- 
tern except for the carriage return (hexadecimal values OD or 
8D). You may detect the reception of a carriage return charac- 
ter by per form i ng' the input operation as one or more READTEXT 
instructions, each of which specifies an input area that is one 
character in length. If the READTEXT operation completes with 
the received character count equal to zero, the character input 
was either an X " 8 D f or X'OD* value since reception of a car- 
riage return terminates a READTEXT instruction without passing 
that character into your input area. There is no method avail- 
able to distinguish between reception of X T D ' and X'8D f val- 
ues . 

Transmission of other than standard alphameric ASCII charac- 
ters to a terminal is accomplished by specifying XLATE=NO on 
the PRINTEXT instruction. In this case, you must define the 
8-bit values to be transmitted by means of DATA or DC 
instructions. The output data area must have the same format as 
is generated by a TEXT instruction. 



Special Considerations for the IBM 3101 in Character Mode 



The IBM 3101 Display Terminal can be connected to the Series/1 
via four attachments: the #7850 Teletypewriter Adapter, #1610 
controller, #2091 controller with #2092 adapter, or #2095 
controller with #2096 adapter. In the following discussion, 
all connections are direct, with no intervening modem. For a 
discussion of leased and switched lines using modems, refer to 
"Considerations for Feature #1610 or #2091 with #2092 Adapter" 
on page 17 . 

For attachment with the #7850 Teletypewriter Adapter, the 
#7850 input selection jumpers (see IBM Series/1 User's Attach- 
ment Manual, GA34-0033) may be set as follows: 



\,-„-y 



MSB 




1 



LSB 




Input 
Selected 
EIA 



Input 
Interpreted as 
Mi nus = datamark 



MSB = Most Significant Bit 
LSB = Least Significant Bit 

Also, the bit rate selection jumpers must match the 3101 setup 
switch settings. 
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A typical setup switch setting would be J 








Group 1 




Group2 


on 
off 


X 
XX XXXXX 




X 
XXXXXXX 



Group3 



X XX 
X XXXX 



Groups 



XXXXXXX 



#"\ 



In the illustration above* the 3101 setup switch settings indi- 
cate 4800 bps. The #7850 bit rate selection jumpers would then 
also indicate 4800 bps. A bit rate of 110 bps would require that 
two stop bits be set in the 3101 setup switches instead of one 
as illustrated above. 

For attachment via the #1610 controller or #2091 controller 
with #2092 adapter, or #2095 controller with #2096 adapter, the 
3101 setup switches may be set as follows: 





Group 1 




Group2 


on 
off 


XXX 
X XXXX 




X 
XX XXXXX 



Group3 



Groups 



X XX 
X XXXX 



X X 
XX XXXX 



The jumpers for the #2091 controller with #2092 adapter should 
have Data Terminal Ready and Request to Send jumpered on. Also, 
the HIGH or LOW speed option must be jumpered to reflect the 
speed set in the 3101 setup switches. In the illustration 
above, the speed is 9600 bps. The RANGE and BITRATE operands on 
the TERMINAL configuration statement must also be compatible 
with the #2091 controller with #2092 adapter jumpers and 3101 
setup sw i tches . 

The jumpers for the #2095 controller with the #2096 adapter 
should have Data Terminal Ready, Request to Send, and Receive 
Line (on = mark) jumpered on. 

Finally, special consideration must be given to operator input 
and internal code representation. This is summarized in the 
following tab le . 
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Operator 
Function 



ATTENTION 



ENTER 



BACKSPACE 
( character 
delete) 

LINE 
DELETE 



Key on 3101 



ESC followed 
by space bar 



(Key above 
SEND key) 



< 

(top row t not 
bottom row) 

DEL 



Character Generated 



Dev i ce = ACCA 



#1610 or 
#20 91 with 
#2092 



EBASC 



X f D9 T 



X f Bl' 



X'll* 



X T FF f 



#2095 

with 

#2096 



ASCII 



X'9B' 



X T 8D T 



X f 88 



X f FF' 



Devi ce = TTY 



#7850 



ASCII 



X f lB f 



X'0D f 



X'08' 



X f 7F' 



■v_y 



Note that ECHO=NO or PROTECT=YES on the READTEXT statement (for 
suppression of input text) has no effect when the 3101 is 
attached via the #1610 controller or the #2091 controller with 
#2092 adapter, or the #2095 controller with #2096 adapter. 
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I Special Considerations for the IBM 3101 in Block Mode 



The IBM 3101 Model 2 may be operated in block mode under control 
of the Multiple Terminal Manager. 



For attachment via the #1610 controller or #2091 controller 
with #2092 adapter, or #2095 controller with #2096 adapter, the 
3101 setup switches may be set as follows: 



Group 1 



on 
off 



XXXX X 
XX X 



Group2 



XX XX 
XX XX 



Group3 



XXXXXXX 



Groups 



XXX 
X XXXX 



g^ 



The jumper for the #2091 controller with #2092 adapter should 
have Data Terminal Ready and Request to Send jumpered on. Also, 
the HIGH or LOW speed option must be jumpered to reflect the 
speed set in the 3101 setup switches. In the illustration 
above, the speed is 2400 bps. The RANGE and BITRATE operands on 
the TERMINAL configuration statement must also be compatible 
with the #2091 controller with #2092 adapter jumpers and 3101 
setup sw i tches . 

The jumpers for the #2095 controller with the #2096 adapter 
should have Data Terminal Ready, Request to Send, and Receive 
Line (on = mark) jumpered on. 

Refer to the System Gu i de for sample TERMINAL statements and 
other system generation considerations. 
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Sample Terminal Support Program (1 of 3 ): The following exam- 
ple shows how to use the terminal support technique to print 
the IBM logo and the time and date. 

SAMPLE PROGRAM START , 500 , TERMERR=ERROR 

XXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXX 

* NOTE THAT THE SUPERVISOR USED TO EXECUTE THIS * 

* SAMPLE PROGRAM MUST HAVE BEEN SYSGEN'ED TO INCLUDE TIMERS, * 

* $SYSL0GA, AND THE TARGET COMMUNICATIONS TERMINALS. THE * 

* NAME OF A TARGET TERMINAL IS THE LABEL USED ON THE TERMINAL * 

* STATEMENT DESCRIBING IT. * 

XXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXX 
* 

TERMX 



STAR 
* 

* 

* 



IOCB $SYSL0GA 
SPACE 2 
EQU * 



TARGET TERMINAL IOCB 



ASK OPERATOR FOR NAME OF TARGET TERMINAL. MOVE THAT NAME 
INTO THE 'TERMX* IOCB AND THEN 'ENQT' ON TERMX. THIS WILL 
ALLOCATE THAT TERMINAL TO THIS PROGRAM AND ALL TERMINAL I/O 
INSTRUCTIONS WILL THEN BE ROUTED TO IT. 



READTEXT TNAME,'ENTER 8 CHAR TERMINAL NAME: 

MOVE TERMX, TNAME, (8, BYTE) MOVE 8 CHARS TO IOCB 



DETERMINE THE LINE CONNECTION TYPE. IF SWITCHED, INQUIRE 
IF THE CPU IS THE CALLER OR THE ANSWERER. 



XFER 



QUES 
MOVE 
PRIN 
PRIN 
QUES 
MOVE 
ENQT 
IF ( 
IF 

EN 

TE 

ENDI 

EJEC 



TION 
A LI 
TEXT 
TEXT 
TION 
A DI 
TER 
LINET 
(DIA 
TERMC 
DIF 
RMCTR 
F 
T 



'SIS THE LINE CONNECTION SWITCHED? f ,NO=XFER 

NETYPE,+SWITCHED INDICATE SWITCHED CONNECTION 

*3 *** ANSWER THE FOLLOWING QUESTION, THEN' 

' PERFORM THE DIAL OPERATION xxx ' 

♦3IS THE CPU THE CALLER? ',YF.S = XFER 

ALTYPE,+ANSWER INDICATE CPU WILL ANSWER 

MX 

YPE,EQ,+SWITCHED) SWITCHED CONNECTION? 

LTYPE,EQ,+ANSWER) CPU TO ANSWER? 

TRL RING WAIT FOR RING INT. TO ANSWER 



L ENABLE 



WAIT FOR DATA SET READY 



v_y 



^_jy 
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Sample Program (2 of 3) 



^•""N 
^w-/ 



* * 

* * 

* NOW THAT ALL TERMINAL I/O IS GOING TO * 

* THE TARGET TERMINAL: * 

* 1. PRINT IBM LOGO * 

* 2. PRINT DATE AND TIME * 

x * 

LOGO EQU * 

PRINTEXT LINE=1 

PRINTEXT LOG01,SPACES=15,SKIP=4 

PRINTEXT LOG02,SPACES=15 

PRINTEXT LOG03,SPACES=15,SKIP=l 

PRINTEXT L0G04,SPACES=15 

PRINTEXT LOG05,SPACES=15,SKIP=l 

PRINTEXT LOG06,SPACES=15,SKIP=l 

PRINTEXT LOG07,SPACES=15,SKIP=l 

PRINTEXT L0G08,SPACES=15 

PRINTEXT LOG09,SPACES=15 

PRINTEXT SKIP=4 

SPACE 
TIMES EQU * 

PRINTEXT 'DATE = f ,SPACES=5 

PRINDATE 

PRINTEXT 'TIME = f ,SPACES=5 

PRINTIME 
STOP EQU * 

GOTO ENDIT END OF SAMPLE 

EJECT 
x * 

* TERMINAL ERROR ROUTINE * 

* * 

ERROR EQU * 

MOVE RC, SAMPLE SAVE THE ERROR CODE 

DEQT RETURN TO SYSTEM CONSOLE 

PRINTEXT '3** UNRECOVERABLE TERMINAL ERROR OCCURRED ** ' 

PRINTEXT T 3 THE ERROR CODE WAS f 

PRINTNUM RC,MODE=HEX 

PRINTEXT T 3** SAMPLE IS TERMINATED **3' 

GOTO ENDIT END THIS PROGRAM 

RC DC F'O' 

EJECT 

* * 

* END OF PROGRAM * 

* * 



Chapter 2. Terminal Support 27 



Sample Program (3 of 3) 

ENDIT EQU * 

IF (LINETYPE,EQ,+SW 

TERMCTRL DISABLE 
ENDIF 
DEQT 

PROGSTOP 
EJECT 



x 

* 
* 

* 

TNAME 
LOGOl 
LOG02 
LOG03 
L0G04 
L0G05 
LOG06 
L0G07 
L0G08 
LOG09 

DIALTY 

CALL 

ANSWER 

LINETY 

SNITCH 

NGNSN 



ITCHED) SWITCHED LINE CONNECTION? 

HANG UP IF SWITCHED CONNECTION 
END OF LINE CONNECTION TEST 
RETURN TO CONSOLE USE 



DATA 



AREA 



TEXT 
TEXT 
TEXT 
TEXT 
TEXT 
TEXT 
TEXT 
TEXT 
TEXT 
TEXT 



LENGTH=8 
IIIIIIIIII 
IIIIIIIIII 

II 

II 

II 

II 

II 
IIIIIIIIII 
IIIIIIIIII 



HOLDS NAME OF TARGET TERMINAL 



BBBBBBBB 
BBB BBBB 
BBB BBBBB 
BBBBBBBBBB 
BBBBBBBB 
BBBBBBBBBB 
BBB BBBB 
BBB BBBB 
BBBBBBBB 



MM MM3 
MMM MMM T 
MMMM MMMM3 
MMMMMMMMMM' 
MMMMMMMMMM' 
MM MMMM MM* 
MM MM MM3 
MM MM3 
MM MM f 



PE 



PE 
ED 



DATA 

EQU 

EQU 

DATA 

EQU 

EQU 

ENDPROG 

END 



F'-l 
-1 


F'0 f 
-1 




DIAL CONNECTION TYPE: 
-1 = CALL 
= ANSWER 
LINE CONNECTION TYPE: 
-1 = SWITCHED 
= NON-SWITCHED 



W 
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Interprocessor Communications 



Using the #1610 Asynchronous Communication Single Line Con- 
troller Adapter feature with Event Driven Executive* processor 
to processor communication is available through the standard 
terminal interface. This mode of communication is specified by 
defining DEVICE=PROC on the TERMINAL statement. It allows con- 
necting Series/1 to Series/1, Series/1 to IBM 5100 and IBM 5110 
(using the Serial I/O feature) > or Series/1 to any other 
processor capable of handling the required protocols. As with 
terminals, ATTENTION signals can be transmitted. The line pro- 
tocol used by interprocessor communications is 2741 and is 
restricted to a single line ACCA feature #1610 per communi- 
cation line to another processor. This provides a means to load 
or cancel programs, synchronize the action of tasks, and send 
and receive data to and from programs residing in remote 
processors. If CODTYPE=EBCDIC is defined on the TERMINAL 
statement, arbitrary binary data can be transmitted. The TER- 
MINAL statement is coded in your source statements for system 
generation, and is assembled together with DISK, SYSTEM, and 
other supervisor configuration statements. Refer to the 
section "System Configuration" in the System Gu i de for 
detailed information. 



Hardware Preparation 

In addition to defining the #1610 controller to the Event Driv- 
en Executive with the TERMINAL statement, you should set the 
hardware jumpers on the attachment according to the IBM 
Series/1 Communications Feature Description , GA34-0028. 

Note ' Interprocessor communication is restricted to the single 
line ACCA feature #1610. 

For a direct processor interconnection: 

• Data Terminal Ready (DTR) is jumpered 

• Request To Send CRTS) is jumpered 

• Low or High speed range is jumpered depending on the bit 
rate chosen (100 to 9600 baud). 
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Be sure to use the right cables for the type of attachments 
being interconnected. For a direct Series/1 to Series/1 con- 
nection* one side should use the Local Communication Cable 
(feature #2056) and the other should use the EIA Data Set cable 
(feature #2057) in order to interchange the Receive/Transmit 
lines; Data Set Ready (DSR)/Data Terminal Ready (DTR) and 
Request To Send (RTS)/Clear To Send (CTS). The #2056 cable 
allows attachment to a modem (male 25-pin type D connector); 
the #2057 cable allows attachment to a terminal (female 25-pin 
type D connector). 



r 



If only one cable type is available* the following lines of the 
25-pin type D connectors have to be crossed: 



Pin numb 


er 




to 


P 


i n 


number 




( connect 


or 


1) 




( 


connector 


2) 


1 






Protective Ground XMT 






1 




2 






Transmit Data (X or T) 






3 




3 






Receive Data (REC) 






2 




4 






Request to Send (RTS) 






5 




5 






Clear to Send (CTS) 






4 




6 






Data Set Ready (DSR) 
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7 






S i gnal Ground 






7 
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Data Terminal Ready (DTR) 






6 





x_ 



For a 
used . 



Series/1 to IBM 5100 connection* the #2056 cable may be 



Terminal Control Block (CCB) 



When DEVICE=PROC is specified on the TERMINAL statement, the 
#1610 controller is defined as an interprocessor communi- 
cations pipeline. The CODTYPE and CRDELAY parameters of the 
TERMINAL statement affect the protocol to be used. See "Modifi- 
cations to the Protocol" on page 33. The BITRATE and RANGE 
parameters should be set in accordance with the hardware jump- 
ers, matching the setting in the other processor. Also, the 
LINSIZE parameter should have the same value in both process- 
ors . 
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Transmission Protocol 



The length of a continuous message generated* for example* by a 
series of PRINTEXT commands on the sending side, might exceed 
the size of the receiving system buffer. Therefore the message 
is divided into records* which themselves may consist of subre- 
cords (only for CODTYPE=EBCDIC ) . 

A record corresponds to a line of text ended by a New Line (NL) 
character* the end of a message is defined as transition from 
Print to Read state and is indicated by an End of Transmission 
(EOT) character. Both messages and/or records may be empty* 
that is, contain no text (for example, in a transmission of 
SKIPs) . 

To a reading Event Driven Executive program, the received end 
characters are signalled as different return codes in the task 
code word. For the possible code types, the hexadecimal repres- 
entation of the end characters is given, together with the cor- 
responding return codes, in Figure 3. 



J*""\ 



CODTYPE= 

Return 
EBCD/CRSP EBCDIC Codes 



End of Transmission (EOT) IF 
End of Record (NL) 5B 

End of Subrecord (EOSR) Not used 



FDFF -2 
FEFF -1 
FCFF Handled 
by de v i ce 
support 



Figure 3. Terminal I/O - Interprocessor Communications Return 
Codes 



Note : For CODTYPE=EBCDIC , two 
the respective end condition. 



characters are used to signal 



As in the IBM 2741 protocol, the beginning of a message (for 
example, the transition from Read to Print state) is indicated 
by transmission of an End of Address (EOA) character to the 
receiver (X'16* for EBCD/CRSP code. For EBCDIC code, see 
"CODTYPE=" on page 33.) 

Before a message is sent, an EOT character indicating that the 
other side entered Read mode must be received. If this charac- 
ter has not been received as the end of the previous message, 
the device support waits the time period specified on the 
CRDELAY parameter, or the the default for this character. If it 
is not received, an error code (8) is returned to your program. 
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Modifications to the Protocol 



The communication protocol may be modified to satisfy special 
requirements by assigning the appropriate values to TERMINAL 
statement parameters. These options are discussed in 
"CRDELAY=" on page 33, and also in "CODTYPE=" on page 33. 






CRDELAY= 



PROMPT, n The device support waits before every record (and 
subrecord) for the EOT prompt character. The time 
limit is n times 3.33 milliseconds, starting at the 
end of the previous operation. In response to the 
EOT, and also at the beginning of every record (and 
subrecord), an EOA character is sent. 



SP5100,n Identical to the PROMPT mode except that at End of 
Record, the two characters Line Feed and New Line 
( X ' 3 B 5 B f ) are sent. This is necessary for communi- 
cation with the IBM 5100 or IBM 5110 running APL or 
BASIC and using the Serial I/O feature. 

DELAY, n At the beginning of a message, the device support 
waits a maximum of one second for the EOT 
character(s). After each record a delay of n times 
3.33 milliseconds is inserted. This mode might be 
used to simulate an 2741-like terminal for another 
processor . 



V„ 



C0DTYPE= 



CRSP 



With this option the #1610 controller is set to PTTC 
mode (see Communications Feature Description ) and 
messages are translated via the CRSP conversion 
table ( PTTC/cor respondence code). The communication 
is restricted to characters, as PTTC mode allows 
only the transmission of bytes with the seven 
low-order bits of odd parity. Therefore, XLATE=N0 
should not be specified on PRINTEXT or READTEXT 
i nst r uct i ons . 
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EBCD 



Similar to CRSP, except that the EBCD conversion 
table is used. The EBCD option is recommended for 
connection to an IBM 5100 or IBM 5110 computer. The 
6-bit code must be selected with the Serial I/O 
m i croprogram . 



EBCDIC This option sets the #1610 controller to Eight Bit 
Coded Data Interchange mode with all change of 
direction codes equal to X*FF f (see the 
Communications Feature Description ). Special 
protocol provides for transparent exchange of arbi- 
trary binary data. As there are no parity 
restrictions and only the code X f FF f is recognized 
as change of direction (indicating EOT, NL or E S R ) , 
all bytes (especially all EBCDIC characters) other 
than X f F F ' are transmitted "as is". Before a message 
or record is sent, it is scanned for a byte code 
(other than X ' F F ' ) not contained in it. This special 
code is sent as EOA and every occurring X f FF' in the 
message or record is replaced by it. On the receiving 
side, every EOA code is replaced by X'FF 1 . If a 
record is larger than 128 bytes, it is divided into 
appropriate subrecords (length < 128 bytes) to which 
the procedure can be applied. 






Note : If CODTYPE=EBCDIC is used, 
data may be transmitted. 



arbitrary binary 



o 
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CHAPTER 3. BINARY SYNCHRONOUS COMMUNICATIONS 



The Event Driven Executive binary synchronous communications 
access method provides statements that allow you to write pro- 
grams to send and receive data on a binary synchronous communi- 
cations line. These statements are a part of the Event Driven 
Language and are coded in your application program. A general 
introduction to binary synchronous communications and details 
of the line protocol used by the Event Driven Executive may be 
found in General Information -~ Binary Synchronous 
Commun i cat i ons , GA27-3004. 

Series/1 binary synchronous communications closely parallels 
the System/370 and additional information on the subject of 
binary synchronous communications may be found in IBM OS/VS 
Basic Telecommunications Access Method (BTAM) , GC27-6980. 

Features of the binary synchronous communications access meth- 
od provided with the Event Driven Executive are: 



o 



Multiple line support 
Point-to-point leased line 



(automatic answer, manual 



Point-to-point switched line 
call and answer ) 

Multipoint tributary station 

Multipoint master station 

Optional transparent mode 

Optional conversational mode 

Hardware features and BSC protocol not supported by the Event 
Driven Executive are: 

• ASCII mode 

• Leading graphics support 

• Transparent ITB and ENQ transmission 

Throughout this chapter, the TYPE parameter is mentioned fre- 
quently, and refers to the TYPE parameter of the BSCLINE state- 
ment discussed in "BSCLINE" on page 42 

For generation of BSC support into your Event Driven Executive 
supervisor, refer to the "System Configuration" section in the 
System Guide . 
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Access Level 



The Event Driven Executive BSC Access Method provides facili- 
ties at the READ/WRITE level. No control characters are 
inserted into or stripped from blocks of data in your buffer. 
However, all additional control sequences are managed by the 
access method in a manner transparent to the using program. You 
must ensure that the proper STX, DLE STX, ETX, and other con- 
trol characters are contained in the output buffer. The single 
exception to this convention is the transmission of the DLE ETX 
or DLE ETB sequence to complete a transparent write, in which 
case these characters must not be included in the output buff- 
er. On input, the buffer will contain all control characters 
rece i ved . 



/f">\ 



Conversational Operations 



The BSC protocol provides a limited conversational response 
capability which is supported by the Event Driven Executive BSC 
Access Method. During conversational write operations, the 
response, which may be either an acknowledgement sequence or 
text, is read into a second buffer area specified by your pro- 
gram. Acknowledgement sequences are checked by the access 
method and error recovery is attempted when indicated. If text 
is received, a -2 return code is returned in lieu of the normal 
-1 and no error recovery is attempted. 

Conversational writes may also be used to perform other special 
functions. For example, an IAM/WRU (I am/Who are you) explana- 
tion sequence can be transmitted by a calling station on a 
switched network using a conversational write. 



Multipoint Operations 



When the Series/1 is operating as the control station on a 
multipoint line (TYPE=MC), the access method handles the poll- 
ing/selection requirements of initial operations via a poll 
sequence whose location address is specified in the BSCIOCB 
statement. A single poll/select is associated with each oper- 
ation. A 3-second time-out is always enabled during 
poll/select operations regardless of the TIMEOUT parameter 
specifications. 



When the Series/1 is operating as a tributary station on a 
multipoint line (TYPE=MT), the access method assumes that 
polling/selection has been established before a read/write 
initial operation is requested. The Read Poll operation moni- 
tors the line for receipt of a polling or selection sequence. 



ij 
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It assumes the BSC Adapter has been jumpered for multipoint 
tributary operation. Once the line has been polled /selected, 
your program should check the next operation request and issue 
appropriate read/write initial operation. 



is accom- 
f ol lowi ng 



The initialization phase for multipoint operation 
plished by the control station transmitting the 
sequence t 

NUL, EOT, PAD, NUL, (poll or selection address ), ENQ 3 

This is the polling/selection sequence. The NUL , EOT , PAD , NU L 3 
portion is generated by the access method. The (poll or 
selection addr ess ) , ENQ 3 portion is supplied by you and refer- 
enced in the BSCIOCB. Generally this sequence consists of three 
bytes containing addr ess , addr ess , ENQ 3 . Refer to General 
Information — Binary Synchronous Communications , GA27-3004 for 
deta i Is . 



Task Control 



o 



An implied wait is associated with each operation; that is, no 
immediate exit capability is provided. However, you may choose 
to attach a separate task to perform the operations in an asyn- 
chronous manner. 

Sample programs are included at the end of this section which 
illustrate the most common communications operations. 



o 



Commas are for readability only and not part of the data 
stream . 
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The Event Driven Language BSC Statements 



The following text describes the Event Driven Language (BSC) 
statements and their syntax. 



BSCCLOSE 



BSCCLOSE is used to free a binary synchronous line for use by 
other tasks. If the line is switched (TYPE=SM or SA), it will 
also drop Data Terminal Ready causing the line to be discon- 
nected . 

Syntax 






label 



BSCCLOSE 



bsciocb,ERR0R=,Pl=,P2= 



Requ i red : bsc i ocb 
Defaults: None 
Indexable: bsciocb 



Operands Descr i pt i on 

label The optional symbolic name of the BSCCLOSE 
statement . 



bsciocb 



ERROR= 



Pn 



The symbolic address or indexed location of the 
BSCIOCB statement to be associated with the close 
operation. Close processing uses this BSCIOCB to 
determine the address of the line to be closed. 

The symbolic address of the next instruction to be 
executed if an error occurs while closing the line. 
If not specified, control will be returned to the 
next sequential instruction. In either case, the 
return code will reflect the results of the oper- 
ation. See Figure 5 on page 57. 

The optional labels, PI and P2 to be affixed to the 
bsciocb and ERROR operands, respectively. 
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BSCIOCB 



BSCIOCB is used to specify the line address and buffer(s) for 
BSCCLOSE, BSCOPEN, BSCREAD and BSCHRITE operations. BSCIOCB is 
a non-executable instruction. The first word of the BSCIOCB is 
also used to return auxiliary information about the ending sta- 
tus of the operation. 

If variable-length records are to be written* the length field 
(lengthl operand) must specify the actual length of the message 
to be written. The value specified in the length field should 
be reset to the buffer length before issuing a READ. Figure 4 
on page 41 lists the number of buffers required by each type of 
BSCREAD and BSCWRITE statement. 

Syntax 



o 



label BSCIOCB 1 i neaddr , buff er 1 , length 1 , buff er 2 , 

length2,pollseq,pollsize,Pl=,P2=, 
P3=,P4=,P5=,P6=,P7=: 



Requ i red : 
Defaults : 
Indexab le : 



1 i neaddr 

None 

Not app 1 i cab le 



Operands Descr i pt i on 

label The symbolic name of the BSCIOCB for reference in a 
BSCCLOSE, BSCOPEN, BSCREAD, or BSCWRITE operation. 
Label may also be used by other instructions to ref- 
erence the auxiliary information returned in the 
first word of the BSCIOCB. This word will contain: 

• After successful receipt of text, the address 
of the last character received. 

• For all other conditions, the Interrupt Status 
Word from the Series/1 BSC Adapter. 

lineaddr The hardware address, in hexadecimal form, of the 
line on which to perform the operation. 

bufferl The address in storage of the first buffer to be 
used in an operation. This buffer is located in the 
target Address Space as defined by $TCBADS. 



lengthl 



The length, in bytes, of the first buffer. 
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buffer2 The address in storage of the second buffer to be 
used in an operation. This buffer is located in the 
target Address Space as defined by $TCBADS. 

Iength2 The length, in bytes, of the second buffer. 



\y 



pollseq The address in storage of the poll 
sequence to be used in a multipoint 
initial operation. 



or select i on 
control 1 i ne 



pollsize The length, in bytes, 
sequence . 



of the poll or selection 



Pn = 



The optional labels to be affixed to the lineaddr, 
bufferl, lengthl, buffer2, length2, pollseq, and 
pollsize operands, respectively. 



Note i The polling and selection sequences, consisting of from 
one to seven characters, are followed by: ENQ,(Read or Write 
Initial) 4 . Specific sequences for a given device may be found 
in the device component description manual. Generally a 3-byte 
pollsize is sufficient for a sequence of address , address , ENQ 4 
between Series/1 processors. The actual sequence is determined 
by the device type tributary. 



y 



Commas are for readability only and are not part of the 
data stream . 
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Number 
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Figure 4. Required Buffers for BSCREAD and BSCWRITE 
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BSCLINE 



The BSCLINE statement is coded as part of your supervisor 
configuration. See "System Configuration" in the System Gu i de . 
BSCLINE defines the binary synchronous lines to be supported in 
the generated system. One BSCLINE statement is required for 
each line to be referenced by programs using the Binary Syn- 
chronous Communications Access Method. All BSCLINE statements 
must be grouped together with the last BSCLINE statement 
including an END = YES specification. 

Syntax 






blank 



BSCLINE ADDRESS=,TYPE=,RETRIES=,MC=,END= 



Requ i red : None 

Defaults: ADDRESS=9 , TYPE=PT, RETRIES=6 , MC=NO, END=NO 

Indexable: Not Applicable 



Operands Descr i pt i on 

ADDRESS= The hardware address (in hexadecimal) of the line. 

TYPE- PT ( Po i nt-to-Po i nt ) - The line is a point-to-point 
(non-switched) line with a single remote station. 
The adapter should be jumpered with DTR permanently 
enabled . 



V_y 



SM (Switch Manual) - The line is on a switched net- 
work and connection will be established manually by 
the operator. The adapter should be jumpered for 
switched line operation and DTR should not be per- 
manently enabled. 

SA (Switched Auto Answer) - The line is on a 
switched network and calls should be answered auto- 
matically by the BSC Access Method (during 
BSCOPEN). The adapter should be jumpered for 
switched line operation and DTR should not be per- 
manently enabled. 

MC (Multipoint Control) - The Series/1 is the con- 
trolling station on a multipoint line. The adapter 
should be jumpered with DTR permanently enabled and 
multipoint line should not be jumpered. 



G 
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MT (Multipoint Tributary) - The Series/1 is a 
tributary station on a multipoint line. The adapter 
should be jumpered for multipoint tributary oper- 
ation with DTR permanently enabled. 



RETRIES= The number of attempts which should be made to 
recover from common error conditions before posting 
a permanent error. 



MC = 



NO - The binary synchronous adapter located at the 
address specified on the ADDRESS operand is either 
a medium speed* single line feature card or a high 
speed, single line feature card. 



c 



END = 



YES - The binary synchronous adapter located at the 
address specified on the ADDRESS operand is part of 
a multiline controller feature configuration. When 
generating supervisors using multiline controller 
attachments, note the following: 

• The character string YES must be specified. Any 
other character string will be equivalent to 
NO. 

♦ All multiline feature cards must start at a 
base address ending with either X * ' or X T 8 * . A 
BSCLINE statement must exist for the line at 
this base address if any of the other lines of 
the multiline attachment are to be used. 

YES, for the last BSCLINE statement in the system 
definition module. 



Examples : 



BSCLINE ADDRESS=28,TYPE=PT,RETRIES=10,MC=NO 
BSCLINE ADDRESS=30,TYPE=SM,RETRIES=2,MC=YES,END=YES 
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BSCOPEN 



BSCOPEN is used to prepare a binary synchronous line for use by 
a task. It first enqueues on the line and then prepares it for 
interrupts. If the line is switched manual (TYPE=SM), it will 
also raise Data Terminal Ready and wait up to two minutes for 
the telephone connection to be established. If the line is 
switched auto-answer (TYPE=SA), it will wait indefinitely for 
the ring interrupt and then raise Data Terminal Ready. 



i 



Syntax 



label 

Requ i red : 
Defaults : 



BSCOPEN 

bsc i ocb 
None 



Indexable: bsc i ocb 



bsciocb,ERR0R=,Pl=,P2= 



Operands Descr i pt i on 

label The optional symbolic name of the BSCOPEN 
i nstr uct i on . 

bsciocb The symbolic address or indexed location of the 
BSCIOCB statement to be associated with the open 
operation. Open processing uses this BSCIOCB to 
determine the address of the line to be opened. 

ERROR= The symbolic address of the next instruction to be 
executed if an error occurs while opening the line. 
If not specified, control will be returned to the 
next sequential instruction. In either case, the 
return code will reflect the results of the oper- 
ation. 



Pn = 



The optional labels to be affixed to the bsciocb and 
ERROR operands, respectively. 



Note ' BSCOPEN assumes that point-to-point lines will be jump 
ered with Data Terminal Ready (DTR) permanently set on. 
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BSCREAD 



BSCREAD is used to read data from a binary synchronous line. If 
the read is successful* the first word of the associated 
BSCIOCB will contain the address of the last character read. 

Syntax 



label BSCREAD type , bsc i ocb , ERROR= , END= , 

TIME0UT=,P1=,P2=,P3= 



Requ i red : 
Defaults : 
Indexable: 



type » bsc i ocb 
TIMEOUT=YES 
bsc i ocb 



^*X 



Operands Description 

label The optional symbolic name of the BSCREAD 
statement . 

type The type of read operation to be performed. See 
"BSCREAD Types" on page 46 for a description of each 
type. 



bsc i ocb The symbolic address or 
BSCIOCB statement to be 
operation. 



indexed location of the 
associated with the read 



ERROR= 



END = 



The symbolic address of the next instruction to be 
executed if an error (return codes 10 through 99) is 
encountered. If not specified* control will be 
returned to the next sequential instruction. In 
either case* the return code will reflect the 
results . 

The symbolic address of the next instruction to be 
executed if an ending condition (return codes 1 
through 6) is encountered. If not specified* con- 
trol will be returned to the next sequential 
instruction. In either case* the return code will 
reflect the results. 
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TIMEOUT= YES - The access method will enable a 3-second 
time-out during receive operations. If data is not 
received within this interval* a time-out error 
will occur. The appropriate retry procedure will 
then be attempted up to the limit specified in the 
RETRIES parameter of the BSCLINE statement defining 
this line. For initial type reads* the time-out may 
occur both when attempting to establish the correct 
initial sequence and during the subsequent read of 
the f i rst record . 






NO - The access method will disable the 
time-out during all receive operations. 



3-second 



Pn = 



The optional labels tobe affixed to the bsciocb, 
ERROR* and END operands* respectively. 



BSCREAD Types 



The eight types of read operations to binary synchronous lines 
are : 

C - Read Continue 
D - Read Delay 
E - Read End 
I - Read Initial 
P - Read Poll 
Q - Read Inqu i ry 
R - Read Repeat 
U - Read User 



Type Qperat i on 

C Read Continue - Used to read subsequent blocks of data 
after an initial block is received via a Read Initial. 

Read Continue writes a positive response and reads a mes- 
sage block: 

1. Write ACK-0 (X f 1070 f ) or ACK-1 ( X T 1 06 1 T ) 

2. Read Text - The text received is either message text 
or an EOT (X'37 f ) 



W 
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Read Delay - Used to acknowledge correct receipt of a 
block of data and to request that the transmitting 
station wait before sending the next block. Multiple 
Read Delays may be issued before resuming transmission 
of data via a Read Continue. 

Read Delay writes a WACK sequence and checks for the pro- 
per ENQ response: 



o 



1. Write WACK (X f 106B f ) 

2. Read ENQ (X f 2D f ) 

Read End - Used to acknowledge correct receipt of a block 
of data and to request that the transmitting station stop 
sending data. Only one Read End should be issued during a 
single transmission and Read Continues should then be 
issued until EOT is actually received. 

Read End writes an RVI sequence and reads a message 
block: 

1. Write RVI (X'107C f ) 

2. Read Text - The text received is either message text 
or an EOT (X , 37 l ) 

Read Initial - Used to read the first block of data in a 
transmission. After a successful Read Initial* Read Con- 
tinues should be issued until EOT is received. 

Point-to-point operation ( TYPE=PT , SA , SM ) . 

A Read Initial monitors the line for an ENQ sent by the 
transmitting station* writes a positive response 
CACK-0), and reads the message block that follows: 

1. Read ENQ (X^D 1 ) 

2. Write ACK-0 CX f 1070' ) 

3. Read message text 

Multipoint operation controller operation (TYPE=MC). 

Read Initial polls a tributary station and if the 
response to polling is positive* reads the message text. 

1. Write EOT (X T 37 f ) 

2. Write polling sequence from address location speci- 
fied in BSCIOCB 

3. Read message text 
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Multipoint operation tributary operation (TYPE=MT). 

Read Initial writes a positive response (ACK-0), and 
reads the message block that follows. 






1. Write ACK-0 (X» 1070» ) 

2. Read message text 

Read Poll - Used to read the polling/selection sequence 
received when the Series/1 is acting as a tributary 
station on a multipoint line (TYPE=MT). Upon successful 
completion, the specified buffer will contain the 
sequence received starting with the second station (con- 
trol unit) address character. The content of the 
received data stream, including control characters is 
not checked by the access method. Once polled/selected, 
your program should check the next operation requested 
and issue the appropriate Read/Write Initial Operation. 

Read Inquiry - Used to read an ENQ character. Read 
Inquiry will return an invalid sequence error if ENQ or 
EOT is not received. If EOT is received, the END= exit 
will be taken if specified. 

1. Read ENQ (X'2D' ) 



Read Repeat - Used to request retransmission of the last 
block of data following an unsuccessful read. The Read 
statements retry most common errors up to the limit of 
the RETRIES operand of the BSCLINE statement; however, 
Read Repeat may be used to attempt further recovery 
depending on the actual error encountered. 



^ 



j/ 



Read Repeat writes a negative response 
station and reads a message block: 



to the remote 



1 . Write NAK (X'3D ? ) 



2. Read Text 



U Read User - Used in special situations to simply receive 
data. No associated write operation is performed by the 
access method, the data is not checked, and no error 
recovery is attempted. 
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BSCWRITE 

BSCWRITE is used to write data to a binary synchronous line 
Syntax 



label BSCWRITE type , bsc i ocb , ERROR= , END= , CHECK= , 

P1=,P2=,P3= 

Required: type,bsciocb 
Defaults: CHECK=YES 
Indexable: bsciocb 



Operands Descr i pt i on 

label The optional symbolic name 
statement . 



of the BSCWRITE 



o 



type 



bsc i ocb 



ERROR= 



END = 



The type of write operation to be 
"BSCWRITE Types" on page 50 for a 
each type . 



performed . See 
descr i pt i on of 



The symbolic address or indexed location of the 
BSCIOCB statement to be associated with the write 
operat i on . 

The symbolic address of the next instruction to be 
executed if an error (return codes 10 thru 99) is 
encountered. If not specified* control will be 
returned to the next sequential instruction. In 
either case, the return code will reflect the 
results . 

The symbolic address of the next instruction to be 
executed if an ending condition (return codes 1 
through 6) is encountered. If not specified* con- 
trol will be returned to the next sequential 
instruction. In either case* the return code will 
reflect the results. 



CHECK= YES - Valid only for type CV or CVX. Normal checking 
of the response occurs. 

NO - The response is not checked for protocol valid- 
ity. This provides a chained write to read similar 
to Write User and Read User. 
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Pn = 



The optional labels to be affixed to the bsciocb, 
ERROR=> and END= operands* respectively. 






BSCWRITE Types 



Seventeen types of write operations can be issued to 
synchronous communications line. They are: 



a b i nary 



c 


- 


Wr 


ite 


Cont 


cv 


- 


Wr 


ite 


Cont 


cvx 


- 


Wr 


ite 


Cont 


ex 


- 


Wr 


te 


Cont 


CXB 


- 


Wr 


te 


Cont 


D 


- 


Wr 


te 


Dela 


E 


- 


Wr 


te 


End 


EX 


- 


Wr 


te 


End 


I 


- 


Wr 


te 


Init 


IV 


- 


Wr 


te 


Init 


IVX 


- 


Wr 


te 


Init 


IX 


- 


Wr 


te 


Init 


IXB 


- 


Wr 


te 


Init 


Q 


- 


Wri 


te 


Inqu 


N 


- 


Wri 


te 


NAK 


U 


- 


Wri 


te 


User 


UX 


■~ 


Wr 


te 


User 


Type 


C 
Wi 


per 


at i on 


C 


" i te 


> Cont i n 



l nue 

inue Conversational 

inue Conversational Transparent 

inue Transparent 

inue Transparent Block 

y 

Transparent 

ial 

ial Conversational 

ial Conversational Transparent 

i a 1 Transparent 

ial Transparent Block 

i ry 



Transparent 



Write Continue - Used to write subsequent blocks of data 
after an initial block is written via a Write Initial. 



Write Continue writes message text and reads a response 
from the receiving station. 



1 . Write Text 

2 . Read Response 

CV Write Continue Conversational - Used to write subsequent 
blocks of data in conversational mode. 

Write Continue Conversational writes message text and 
reads a response into your buffer. Acknowledgement 
sequences are checked by the access method and error 
recovery is attempted when indicated. If text is 
received, a -2 return code is returned in lieu of the 
normal -1 . 

1 . Write Text 
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2. Read Response/Text 

CVX Write Continue Conversational Transparent - Used to 
write subsequent blocks of transparent data in conversa- 
t i ona 1 mode . 

Write Continue Conversational Transparent writes mes- 
sage text and the ending sequence* DLE ETX, and reads a 
response into your buffer. Acknowledgement sequences are 
checked by the access method and error recovery is 
attempted when indicated. If text is received, a -2 
return code is returned in lieu of the normal -1. 

1 . Write Text 

2. Write DLE ETX (X'1003' ) 

3. Read Response/Text 



CX Write Continue Transparent - Used to write subsequent 
blocks of transparent data after an initial block is 
wr i tten . 



o 



Write Continue Transparent writes message text and the 
ending characters, DLE ETX, that must follow transparent 
data and reads a response from the receiving station. 

1 . Wr i te Text 

2. Write DLE ETX (X'lOOS 1 ) 



3. Read Response 

CXB Write Continue Transparent Block - Used to write 
subsequent blocks of transparent data after an initial 
block is written. This operation is the same as BSCWRITE 
type CX except ETB is used instead of ETX as the ending 
character . 

Write Continue Transparent Block writes message text and 
the ending characters DLE ETB, that must follow trans- 
parent data, and reads a response from the receiving 
stat i on . 

1 . Wr i te Text 



2. Write DLE ETB CX'1026 T ) 

3. Read Response 

Write Delay - Used to inform the remote station that the 
transmission of the next block of data will be delayed. 
Multiple Write Delays may be issued before transmission 
of data is resumed. 
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Write Delay writes a temporary text delay (TTD) sequence 
to the receiving station and reads a NAK response. The 
purpose of this operation is to inform the receiving 
station of a TTD before resuming transmission of message 
b locks . 

1. Write TTD (X f 022D' ) 

2. Read NAK (X'3D f ) 

E Write End - Used to inform the remote station that the 
previous block of data was the last of this transmission. 
Write End writes an EOT: 

1 . Write EOT (X»37) 

EX Write End Transparent - Used to write a transparent EOT 
(DLE EOT). This sequence is most commonly used to notify 
the receiving station on a switched line that the trans- 
mitting station is disconnecting from the line. Write 
End Transparent writes DLE EOT: 

1 . Write DLE EOT CX'1037' ) 



Write Initial - Used to write the first block of data in a 
transmission. Write Initial first establishes the cor- 
rect initial sequence (depending on the type of line), 
and then writes the first block and checks the response. 

• Point-to-point Operation ( TYPE = PT , SA , SM ) 



Vy 



Write Initial writes an ENQ to gain use of the line* 
reads positive response (ACK-0), writes the message 
text and reads the response to the text: 

1. Write ENQ (X'2D f ) 

2 . Read ACK-0 (X' 1070* ) 

3. Write Message text 
4 . Read Response 

Multipoint Operation Controller Mode (TYPE=MC) 

Write Initial selects a tributary station and if the 
response to selection is positive, writes message 
text, then reads the response: 

1 . Write EOT (X f 37' ) 

2. Write selection sequence where location address 
is specified in BSCIOCB 
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3. Read ACK-0 (X f 1070* ; 

4. Write Message Text 

5 . Read Response 

Multipoint Operation Tributary Mode (TYPE=MT) 

Write Initial writes message text and reads a 
response from the controller station: 

1 . Write Message Text 

2 . Read Response 

IV Write Initial Conversational - Used to write the first 
block of data of a transmission in conversational mode. 

Write Initial Conversational establishes the correct 
initial sequence (depending on the type of line)* writes 
the first block of message text and reads a response into 
your buffer. Acknowledgement sequences are checked by 
the access method and error recovery is attempted when 
indicated. If text is received* a -2 return code is 
returned in lieu of the normal -1. 

• Point-to-point Operation ( TYPE=PT , SA , SM ) 

1. Write ENQ (X'2D f ) 

2. Read ACK-0 CX»1070 T ) 

3. Write Message Text 

4. Read Response Text 

• Multipoint Operation Controller Mode (TYPE=MC) 

1 . Write EOT (X f 37' ) 

2. Write selection sequence found in BSCIOCB 

3. Read ACK-0 (X 1 1070' ) 

4. Write Message Text 

5. Read Response Text 

• Multipoint Operation Tributary Mode (TYPE=MT) 

1. Write Message Text 

2. Read Response Text 
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IVX Write Initial Conversational Transparent - Used to write 
the first block of transparent data of a transmission in 
conversational mode. 

Write Initial Conversational Transparent first estab- 
lishes the correct initial sequence (depending on the 
type of line)* writes the first block of message text and 
the ending characters* DLE ETX, that must follow trans- 
parent data and reads a response into your buffer. 
Acknowledgement sequences are checked by the access 
method and error recovery is attempted when indicated. 
If text is received* a -2 return code is returned in lieu 
of the normal -1 . 

• Point-to-point Operati on (TYPE=PT, SA , SM) 
1 . Write ENQ (X f 2D 1 ) 

2. Read ACK-0 (X'lOyO 1 ) 

3. Write Message Text 

4. Write DLE ETX (X T 1003M 

5. Read Response Text 

• Multipoint Operation Controller Mode (TYPE=MC) 

1. Write EOT (X f 37 f ) 

2. Write selection sequence found in BSCIOCB 

3. Read ACK-0 (X'1070 f ) 

4. Write Message Text 

5. Write DLE ETX (X T 1003 f ) 

6. Read Response Text 

• Multipoint Operation Tributary Mode (TYPE=MT) 

1. Write Message Text 

2. Write DLE ETX (X t 1003 T ) 

3. Read Response Text 

IX Write Initial Transparent - Used to write the first block 
of transparent data in a transmission. Write Initial 
Transparent first establishes the correct initial 
sequence (depending on the type of line)* and then writes 
the first block of transparent data and checks the 
response. The block is terminated by the access method 
with DLE ETX. 
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IXB Write Initial Transparent Block - Same as IX except ETB 
is used instead of ETX as the ending character. 

Q Write Inquiry - Used to write an ENQ character and to 
read the response (which may be either a control sequence 
or text) into your buffer. This sequence is most commonly 
used to request retransmission of the response to a mes- 
sage block. It also retries upon time-out. 

1. Write ENQ (X^D* ) 

2. Read Response/Text 

N Write NAK - Used to simply write a NAK character down the 
line. The most likely use of this operation is to respond 
"device not ready" to polling/selection when the 
Series/1 is operating as a tributary station on a multi- 
point line (TYPE=MT) . 

1. Write NAK (X'3D f ) 



U Write User - Used in special situations to simply 
transmit a character stream. No associated read oper- 
ation is performed by the access method* and no error 
recovery is attempted. 



#*\ 



1. Write buffer in BSCIOCB for length indicated. 

UX Write User Transparent - Used in special situations to 
simply transmit a transparent character stream. No asso- 
ciated read operation is performed by the access method* 
and no error recovery is attempted. 



1. Write the stream 
buf ferl/lengthl 



described 



by 



BSCIOCB 



2. Exit transparent write using 
described by BSCIOCB buffer2. 



the character pair 



Note : The only valid character pairs which may 
contained in buffer2 are DLE ETX, DLE ETB, or DLE ENQ. 



be 
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Error Recovery 

Each BSC operation results in a return code being returned in 
the calling task's TCB (may be referenced by the taskname). 
Figure 5 on page 57 describes these return codes. Three basic 
completion conditions are possible: 

• Successful operation 

• Ending sequence received (END=) 

• Permanent error encountered (ERROR=) 

The particular type of condition encountered determines which 
of two optional completion exits may be taken during a read or 
wr i te operat i on . 

The access method attempts to recover from common line errors* 
but hardware and specification errors are not retried. Your 
program is free to retry permanent errors* and under certain 
conditions such attempts may prove successful. 

Auxiliary error information is returned in the first word of 
the BSCIOCB. After successful receipt of text, the address of 
the last character received is returned in this word. For all 
other conditions, the Interrupt Status Word (ISN) from the 
Series/1 BSC Adapter is returned. 



v>' 
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Code 



Description 



Notes 



-2 
-1 



END 

1 
2 
3 
A 
5 
6 



ERROR= 

10 
11 
12 
13 
14 
15 
20 
21 
22 
23 
24 
25 
30 
31 
32 
33 
34 

35 
99 



Text received in conversational 
Successful completion 



mode 



EOT rece i ved 

DLE EOT received 

Reverse interrupt received 

Forward abort received 

Remote station not ready (NAK received) 

Remote station busy (WACK received) 



Timeout 

Unr eco v 

Invalid 

Invalid 

Disrega 

Remote 

Wrong 1 

Wrong 1 

In va 1 id 

Buffer 

Undef i n 

Line no 

Modem i 

Hardwar 

Hardwar 

Unexpec 

Invalid 

attempt 

Enable 

Access 



occ 
ered 

seq 

mu 1 
rd t 
stat 
engt 
engt 

buf 
leng 
ed 1 
t op 
nter 
e o v 
e er 
ted 

i nt 

or d 

met h 



ur r ed 

transmission error (BSC error) 
uence received 

ti -point tributary write attempt 
his block sequence received 
ion busy (WACK received) 
h record - long (No COD) 
h record - short (write only) 
f er address 
th zero 
i ne address 
ened by calling task 
face error 
er r un 
ror 

ring interrupt 
errupt during auto-answer 



isable DTR 
od error 



error 



Figure 5. BSC Return Codes 



Notes •* 



1. Retried up to the limit specified on the RETRIES operand of 
the BSCLINE definition. 

2 . Not retried. 

3. Retried during write operations only when a wrong ACK is 
received following an ENQ request after timeout (indicat- 
ing that no text had been received at the remote station). 
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4. Returned only during an initial sequence with no retry 
attempted . 

5. Retried only after an unsuccessful start I/O attempt. 

6. Retried only during read operations. 






\__s 



xJ 
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Sample Program: Write Transparent 



SOURCE STATEMENT 

PRINT NOGEN 
WRITEX PROGRAM START 

START BSCOPEN IOCB , ERROR=PR INTERR 
RESTART BSCWRITE IX, IOCB 

IF (WRITEX, EQ, 10), GOTO, RESTART 

IF (WRITEX, NE,-1), GOTO, PRINTERR 

DO 29, TIMES 
ADD 1,1 
CONVTB MSG#,I 
BSCWRITE CX,IOCB,ERROR=PRINTERR 

ENDDO 

BSCWRITE E, IOCB,ERROR=PRINTERR 

GOTO ALLDONE 
PRINTERR MOVE ERRCODE , WR ITEX 

PRINTEXT 'WRITE ERROR : f , SKI P= 1 

PRINTNUM ERRCODE 

BSCCLOSE IOCB 
ALLDONE PROGSTOP 
IOCB BSCIOCB 19, BUFFER, 82 
BUFFER DC X'1002 T 

DC CL74'TEST MESSAGE 1 
MSG# DC CL6' 1» 
I DC F f l f 
ERRCODE DC F'O' 
ENDPROG 
END 
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Sample Program: Read Transparent 



SOURCE STATEMENT 






READX 
START 

RESTART 



PRINTIT 



PRINTERR 



ALLDONE 



IOCB 

INPUT 

MSG 

ERRMSG 

RETCODE 



PRINT NOGEN 

PROGRAM START 

ENQT SSYSPRTR 

BSCOPEN IOCB,ERROR=PRINTERR 

BSCREAD I, IOCB 

IF (READX, EQ, 10), GOTO, RESTART 

IF (READX, NE,-1), GOTO, PRINTERR 

MOVE MSG,INPUT+2, (80, BYTE) 

PRINTEXT MSG,SKIP=1 

BSCREAD C, I OCB, END= A L LDONE , ERROR = PRINTERR 

GOTO PRINTIT 

MOVE RETCODE, READX 

PRINTEXT ERRMSG, SKIP=1 

PRINTNUM RETCODE 

BSCREAD R, IOCB , ERROR=AL LDONE , END=AL LDONE 

GOTO PRINTIT 

DEQT 

BSCCLOSE IOCB 

PROGSTOP 

BSCIOCB 29, INPUT, 83 

DC CL83' ' 

TEXT LENGTH=80 

TEXT 'READ ERROR: » 

DC F'O' 

ENDPROG 

END 



Note : The $BSCUT2 utility contains many examples of the use of 
the Series/1 Event Driven Executive binary synchronous 
instructions. Examination of the source program for SBSCUT2 
should answer many questions on buffer content of both data to 
be transmitted and data received. 
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Utility Programs (BSC) 



This section describes the Event Driven Executive BSC utility 
programs and their syntax. 



$BSCTRCE 



The $BSCTRCE utility program provides a means to trace the I/O 
activities on a given BSC line. $BSCTRCE must be loaded in the 
same partition as the application program that is controlling 
the traced line. If loaded in any other partition, unpredict- 
able results will occur. When loaded, SBSCTRCE prompts for the 
disk or diskette file in which to place the trace output. 
SBSCTRCE then prompts for the line number to be traced. The 
trace action is terminated by the attention command STOP. Since 
the output file is reused from the beginning whenever the end 
is reached, $BSCTRCE displays the relative record number of the 
last trace record written upon termination. The trace file can 
then be displayed or listed using the $ B S C U T 1 utility. Multiple 
BSC lines may be traced concurrently with multiple loads of 
SBSCTRCE using different trace files, for example! 



> $L $BSCTRCE 

DSKNAME, VOLUME) : TRACE9 
SBSCTRCE 6P, 11:03:22, LP=6500 
ENTER LINE NUMBER (HEX): 9 



> STOP 

LAST TRACE RECORD EQUALS 19 
$BSCTRCE ENDED AT 11:13:31 



Trace File Record Format: The format of the records produced by 
$BSCTRCE is shown below. 



CC 


ISW 


STATUS 


DCB 


LGTH 


DATA 


LAST4 



+ 2 



+ 4 



+ 10 



+ 26 



28 



+ 252 
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*CC Interrupt Condition Code on completion of the I/O. 

*ISW Interrupt Status Word on completion of the I/O. 

^STATUS The three status words of the BSC Adapter (produced 
when bit of the I S W is on.) 

DCB The Device Control Block for the I/O. 

LGTH The length of the data sent/received. 

DATA The data in main storage following the I/O. 

LAST4 The last 4 bytes of data if the data is longer than 227 
bytes . 

Note * * These fields are zero when the DCB has been chained 
from the previous record's DCB. 



$BSCUT1 



The SBSCUTl utility program formats binary synchronous trace 
files (see SBSCTRCE utility description) to either $SYSPRTR or 
a terminal. You may select the records of the trace file to 
dump. You will be prompted, as necessary, for information 
required by the functions of $BSCUT1. 

Following is a list of the available functions of $BSCUT1, as 
obtained by using the ? command. 



-J 



COMMANDS): ? 

CV - CHANGE VOLUME 

DP - PRINT TRACE FILE ON PRINTER 

DU - DUMP TRACE FILE ON TERMINAL 

(CA WILL CANCEL) 
EN - END PROGRAM 

COMMAND (?): 



/T^. 

Vy 
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Example? Dump trace file to your console 

COMMAND (?) : DU TRACE9 
FIRST RECORD: 32 
LAST RECORD: 33 

DUMP OF TRACE FILE TRACE9 ON EDX002 

***** RECORD 32 ***** START OF CHAINED OPERATION 

CC = 0002 ISW = A009 STATUS = 98DA 0001 C080 
RESULT: EXCEPTION - NRONG LENGTH RECORD (SHORT) 



DCB = 8004 0000 0000 0000 0000 
OPERATION: CHAINED TRANSMIT 

DATA LENGTH = 2 
1 1061 



2B1C 0002 2AE4 



***** 



RECORD 



33 



***** 



CONTINUATION OF CHAINED OPERATION 



DCB = 2008 0000 0000 0000 0000 0000 0200 96F6 
OPERATION: RECEIVE WITH TIMEOUT 






DATA 

1 

17 

33 

49 

65 

81 

97 

113 

129 

145 

161 

177 

193 

209 

LAST 



LENGTH 
227 615 



040 
7C5 
0F7 
6C2 
0C5 
640 
0D1 
4F5 
9C9 
3F4 
0F1 
7D9 
BF3 



F4F 
C3E 
1E2 
404 
E7C 
40F 
D6C 
40C 
D64 
40D 
F04 
C9D 
F44 



4 
B F1F6 
2 F440 

4 E3C9 
7 615B 
F4F2 

5 C3E4 
1E27 
4040 
E7C5 



4 D4D5 



7 
2 
5 

40F5 

1 D6C2 
D6D5 
6 4040 
D1D6 
1E26 



85 
4BF5 
D7D9 
D5C7 
F1F6 
F340 
E3C9 
615B 
F3F0 
C3E4 
1E27 
1D43 
40D7 
F51E 
C240 



F94B 
F3F0 
40D4 
4BF5 
C8D8 
D5C7 
F1F6 
F040 
E3C9 
615B 
F4F8 
D9C9 
2761 
40F3 



F3F4 
F1F6 
40D7 
F94B 
F1F2 
40D4 
4BF5 
C9E2 
D5C7 
F1F6 
407B 
D5E3 
5BF1 
F2F0 



40D1 
F5F6 
D9C9 
F3F4 
F1F6 
40D7 
F94B 
F0F3 
40E5 
4BF5 
C7E2 
D9F2 
F64B 
40C6 



D6C2 
40C5 
D640 
40D1 
F5F6 
D9C9 
F3F4 
F1F4 
40D7 
F94B 
D7C5 
4040 
F5F9 
C7F6 



. ./$16 

424 
XECUTI 

7. ./$ 
OB 42 

EXECU 
7. . 

JOB 
45 EXE 
RIO 5 
34 JOB 
010 ON 
PRIO 
.34 JO 
MN. . 



.59.3 
PR301 
NG M 
16.59 
3 HQ1 
TING 
/$16. 
300 I 
CUTIN 
. ./$1 
. .48 

PRIN 
5. ./$ 
B 32 



4 JOB 

656 E 

PRIO 

.34 J 

21656 

M PRI 

59.34 

S0314 

G V P 

6.59. 

#GSPE 

TR2 

16.59 

FG6 



DUMP COMPLETE 
ANOTHER AREA? 
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$BSCUT2 



The $BSCUT2 utility program checks out the binary synchronous 
communications access method (B5CAM), the BSCLINE definitions 
generated in the executing supervisor, and the hardware cus- 
tomized jumper assignments in the adapters. Various BSCAM 
capabilities may be tested as follows: 

1. Read and write both transparent and non-transparent data 



y 



2. 



3. 



4. 



Operate in limited conversational mode with both transpar- 
ent and non-transparent data 

Operate as a master controller on a multipoint (multidrop) 
line to both poll and select tributaries (text written only 
for transparent data) 

Operate as a tributary on a multipoint line and be polled 
and selected (text written only for transparent mode) 



The primary purpose of this utility is to check out your system 
after installation* supervisor generation, and your tailored 
adapter assignments via the jumper options (device address, 
type such as PT, SM or SA, tributary address, etc.). Therefore 
it is essential to have this information available to run this 
program. For each selected function in $BSCUT2, you will be 
prompted for the device (line) address, tributary address (if 
multipoint), record length, etc. Error messages will print if 
any discrepancies exist between the function being performed 
and the hardware assignments. These error codes are defined in 
this sect i on . 

Normal or successful exercising of any given function results 
in a test pattern message being printed or displayed on the 
selected output terminal. The output basically consists of: 

1. First section - Internal task identifier (for example READ 
for transparent and non-transparent reads), and optionally 
record number and record length. 



Examp le : 

Task READ entered RECORD NUMBER= 1 RECORD LENGTH= 80 



64 SC34-Q316 



o 



2. Second line - Function identifier, record number, and 
alphabetic text string (A through Z) repeated to fill 
record length specified. The identifier and record number 
make up a 25-byte field and the remaining record length is 
filled by the alphabetic string. Therefore if you speci- 
fied a record length of 80, the alphabetic string would 
consist of 55 characters (A through Z , A through Z, and 
ABC) . 



The output message in the previous example is repeated for the 
number of records transmitted. 

Following is a list of the available functions of SBSCUT2 as 
obtained by using the ? command. 






$BSCUT2 



74P, 00:33:52: , LP=9400 



COMMAND (?): ? 

RWI READ/WRITE - NONTR ANSPARENT 

RWIX READ/WRITE - TRANSPARENT 

RWIMP — READ/WRITE - MULTIDROP LINE NONTR ANSPARENT 
RWIXMP - READ/WRITE - MULTIDROP LINE TRANSPARENT 

RI READ _ TRANSPARENT/NONTRANSPARENT 

WI WRITE - NONTRANSPARENT 

WIX WRITE - TRANSPARENT 

EN END THE PROGRAM 

CH CHANGE HARDCOPY DEVICE 

RWIVX -- READ/WRITE - TRANSPARENT CONVERSATIONAL 
RWIV — READ/WRITE - NONTRANSPARENT CONVERSATIONAL 



$BSCUT2 can be used to check out binary synchronous operations 
if at least two binary synchronous adapters are available on 
Series/1 processors and if a connection between the two adapt- 
ers is made. If switched manual connections are used, SBSCUT2 
does not prompt you to make connection. This must be done once 
the SBSCUT2 command has been issued and all questions have been 
answered . 

Note : $BSCUT2 contains many examples of the use of the Series/1 
Event Driven Executive binary synchronous instructions. Exam- 
ination of the source program for $BSCUT2 should answer many 
questions on buffer content of both data to be transmitted and 
data rece i ved . 

Following are explanations of each type of command for $BSCUT2: 
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RWI - Read/Write Non-transparent Data 



This command writes non-transparent messages on line. Each 
message is numbered. The record length for write includes the 
control characters. The read task receives the messages* 
analyzes them* and prints them on the hardcopy device. The 
analysis includes transparent or non-transparent and record 
length received. 






COMMAND (?): RWI 

RWI READ/WRITE - 

READ ADDRESS? 5A 
WRITE ADDRESS? 5B 
READ RECL? 80 
WRITE RECL? 80 
NUMBER OF RECORDS? 10 
READ MONITOR? Y 
WRITE MONITOR? Y 



NONTRANSPARENT 



Notes : 



READ ADDRESS and WRITE ADDRESS refer to binary synchronous 
adapter channel address. If the test is to be run between 
two processors (one to read and one to write)*, load SBSCUT2 
on both processors and enter the correct address for read 
on one processor and the correct address for write on the 
other processor. The other address can be invalid and the 
corresponding task on each processor will fail due to an 
undefined line; however, the read /write task will function 
properly. This is true for all SBSCUT2 commands. 



v_y 



RECL questions refer to the buffer size to be used and 
therefore the number of bytes transferred in one trans- 
mission over the binary synchronous line. The maximum 
buffer size permitted is 512 bytes. READ (RECL) should 
always be equal to or greater than WRITE or errors will 
occur . 

NUMBER OF RECORDS determines the number of transmissions 
to be made before the test ends. 

"Monitor" functions turn on a switch which allows each task 
to report its progress to the terminal. Thus TASK ENTERED* 
TASK EXITED messages and so on are written to the invoking 
terminal if the monitor function is enabled. 



1> 
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RWIX 



Read/Write Transparent Data 



COMMAND (?): RWIX 

RWIX READ/WRITE 

READ ADDRESS? 5A 
WRITE ADDRESS? 5B 
READ RECL? 80 
WRITE RECL? 80 
NUMBER OF RECORDS? 
READ MONITOR? Y 
WRITE MONITOR? Y 



TRANSPARENT 



10 



Same as "RWI - Read/Write Non-transparent Data" on page 
except data transmitted by the WRITE task is transparent. 



66 



RWIXMP - Read/Write Transparent* Multidrop Line 



o 



COMMAND (?): RWIXMP 

RWIXMP - READ/WRITE - MULTIDROP LINE TRANSPARENT 

MC DEVICE ADDRESS? 50 

BUFFER LENGTH? 80 

NUMBER OF RECORDS? 5 

LOOP COUNT? 1 

MONITOR? Y 

NUMBER OF TRIBUTARIES? 1 

PARAMETERS FOR TRIBUTARY? 1 
MT DEVICE ADDRESS? 51 
MT TRIBUTARY ADDRESS? 02 
BUFFER LENGTH? 80 
NUMBER OF RECORDS? 5 
MONITOR? Y 



See notes under "RWI - Read/Write Non-transparent Data" on page 
66. In this command, BUFFER LENGTH is equivalent to RECL. 
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The master controller (MO at device address polls and selects 
all tributaries (MT) and sends and receives messages to them. 
Since each task both transmits and receives? successful oper- 
ation requires the controller buffer length to equal all 
tributary buffer lengths. Values other than this can be entered 
to test access method error detection. Received messages are 
logged to the hardcopy device. 

DEVICE ADDRESS for this command refers to binary synchronous 
adapter channel address. TRIBUTARY ADDRESS refers to the jump- 
ered tributary address on each card. 

Note t The adapter must be jumpered in tributary mode for this 
test to function properly. 

If the test being performed is between two SBSCUT2 programs 
then : 

1. Program 1 would use a valid MC device address and dummy 
tr i butar i es ( MT ) 

2. Program 2 would use a dummy MC device address and valid 
tr i butar i es ( MT) 

3. NUMBER OF TRIBUTARIES must be equal in both programs 

4. LOOP COUNT must be equal in both programs. 



RI 



Read Transparent/Non-t ranspar ent 



COMMAND (?): RI 

RI READ - TRANSPARENT/NONTRANSPARENT 

READ ADDRESS? 5A 
READ RECL? 80 
READ MONITOR? Y 



See note under "WIX - Nrite Transparent" on page 69 
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MI - Write Non-transparent 



COMMAND (?): WI 

WI WRITE - NONTRANSPARENT 

WRITE ADDRESS? 5B 
WRITE RECL? 80 
NUMBER OF RECORDS? 10 
WRITE MONITOR? Y 



See note under "WIX - Write Transparent." 



WIX - Write Transparent 






COMMAND (?): NIX 

WIX WRITE - TRANSPARENT 

WRITE ADDRESS? 5B 
WRITE RECL? 80 
NUMBER OF RECORDS? 5 
WRITE MONITOR? Y 



o 



Note i RI» WI, and WIX commands individually activate the tasks 
comprising RWI and RWIX. The Read task does not require NUMBER 
OF RECORDS since it will read either transparent or non- 
transparent data until EOT is received. This makes the Read 
task useful for monitoring any binary synchronous line sending 
data to the processor. For example* RI can receive data from 
$RJE2780 or $RJE3780 utilities operating in the same Series/1 
or in another Series/1. 
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EN - End $BSCUT2 Program 



COMMAND 
$BSCUT2 



(?): EN 
ENDED AT 01 



14:40 



CH - Change Hardcopv Device 



COMMAND (?): CH 

NEW HARDCOPY DEVICE? SSYSLOGA 



Note * If the hardcopy device entered is not defined, then the 
hardcopy output will come to the terminal which loaded $BSCUT2. 






RWIVX - Read/Write Transparent Conversational 



COMMAND (?): RWIVX 








RWIVX — READ/WRITE 


- 


TRANSPARENT 


CONVERSATIONAL 


READ ADDRESS? 5A 








WRITE ADDRESS? 5B 








BUFFER LENGTH? 5 








NUMBER OF RECORDS? 


10 






READ MONITOR? Y 








WRITE MONITOR? Y 
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RWIV 



Read/Write Non-t r ansoar ent Conversational 



COMMAND (?): RWIV 

RWIV READ/WRITE 

READ ADDRESS? 5B 
WRITE ADDRESS? 5A 
BUFFER LENGTH? 80 
NUMBER OF RECORDS? ! 
READ MONITOR? Y 
WRITE MONITOR? Y 



NONTRANSPARENT CONVERSATIONAL 



For RWIVX and RWIV commands, see Notes under "RWI - Read/Write 
Non-transparent Data" on page 66. In this command BUFFER LENGTH 
is equivalent to RECL. 

RWIVX and RWIV test limited conversational operation in both 
transparent and non-transparent mode. The following is a 
description of the binary synchronous line transactions? 






WRITE TASK 
BSCWRITE N(X) 

BSCREAD C 
BSCWRITE CV(X) 
BSCWRITE CV(X) 
BSCREAD C 



ENQ > 

< ACKO (Response)- 

Text > 

< Text (Response) — 

ACK1 (Response)-> 

< Text 

Text (Response)-> 

< ACKO (Response) — 

Text > 

< Text 

ACK1 > 



READ TASK 
BSCREAD I 

BSCWRITE CY(X) 
BSCWRITE CV(X) 
BSCREAD C 
BSCWRITE CV(X) 



This sequence continues until the NUMBER OF RECORDS count is 
sat i sf i ed . 
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SPRT2780 and $PRT3780 Utility Programs 



$PRT2780 and $PRT3780 are utility programs which will print the 
spool records produced by the $RJE2780 and $RJE3780 utilities. 
When these utilities are loaded* they prompt for the name of 
the spool file to be printed. The utility terminates upon 
reaching the end of the spool file. An initial option allows 
you to choose a printer other than $SYSPRTR if desired. 






Example : 

> $L $PRT3780 

DSKNAME, VOLUME) : ASMWORK 
$PRT3780 9P, 00:02:44, LP= 8000 
PRINT TO $SYSPRTR? (Y OR N): Y 
$PRT3780 ENDED AT 00:03:05 



Spooled data from a /*DR HASP command during remote job entry 
session as printed out by above utility is: 



$19.28.14 


RM74.RD1 


*** 


INACTIVE 


$19.28.14 


RM74.PR1 


*** 


INACTIVE 


$19.28.14 


RM74.PU1 


XXX 


INACTIVE 


$19.28. 14 


RM75.RD1 


X** 


INACTIVE 


$19.28.14 


RM75.PR1 


XXX 


INACTIVE 


$19.28.14 


RM75.PU1 


XXX 


INACTIVE 
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$RJE2780 and $RJE3780 Utility Programs 



$RJE2780 is a utility program which can be used to interface 
with a System/360 or System/370 via remote job entry. It simu- 
lates an IBM 2780 having the following characteristics and fea- 
tures: 






Model 2 (Card reader, card punch, and printer) 

EBCDIC transparency 

Multiple record transmission 

132-character print line 

Transparent punch output only 

No horizontal tab 

No tape controlled operations (except channel 1 as new page 
indicator) 

$RJE3780 is a utility program which can be used to interface 
with a System/360 or System/370 via remote job entry. It simu- 
lates an IBM 3780 having the following characteristics and fea- 
tures : 

3780 with IBM 3781 Card Punch 

• Compression for both input and output 

• Vert i cal tab 

• Transparent punch output only 

$RJE2780 and $RJE3780 present the same interface to the follow- 
ing list of host RJE facilities: 

• HASP or HASP V4 

• JES2 or JES3 
RES 

• VMRSCS 

In the following pages, $RJE refers both to SRJE2780 and 
$RJE3780. 



The $RJE utility is controlled by a set of attention requests. 
See Figure 6 on page 74. 
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ABORT Stops transmission to or from the 
host 

COMMAND Sends a single card image to the host 

END Terminates execution of the utility 

ENDSPOOL Switches from spooling to direct printing 

PRINTON Defines the terminal name used for output 

PUNCHO Defines a disk or diskette file for 
punch output of object data 

PUNCHS Defines a disk or diskette file for 
punch output of source data 

RESET Reset function (use caution) 

SPOOL Defines a disk or diskette file for 

printer output and to commence spooling 

SUBMIT Sends a data stream to the host 

SUBMITX Sends a transparent data stream to the 
host 



V. 



Figure 6 . $RJE Attention Requests 



When the $RJE utility is first loaded, it checks for the pres- 
ence of only one BSC line specified in the supervisor. If true, 
the actual device address of the adapter is used as the default 
line address and a prompting message is suppressed. If more 
than one BSC line has been defined, it prompts for the RJE line 
address. Subsequent control operations are all performed using 
the attention request commands. Multiple copies of $RJE can be 
loaded using different lines to the host. The spool facility 
can be used to avoid contention for a single p r i nter. Figure 7 
on page 78 and Figure 8 on page 79 show a sample $RJE session. 

Attention Requests 

ABORT : ABORT is used to stop a data transmission which is cur- 
rently in process. During a SUBMIT or SUBMITX operation, normal 
end-of-file is transmitted to the host following the current 
block. During receive operations, EOT is returned instead of a 
normal acknowledgement and data then continues to be received 
until the host sends EOT. Depending on the operation of the 
host RJE system, this can result in suspension of print or 
punch output and a pause during which the host will receive 
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input. Since the pause for input by the host may be short* any 
desired commands (for example* to submit another job* cancel 
the current output* hold a job, or display status) should be 
entered before the ABORT command. This command simulates 
pressing STOP on a 2780 while printing or punching, CARRIAGE 
STOP on a 3780 printer while printing* or STOP on a 3781 punch 
while punching. 



COMMAND * COMMAND is used to send a single card image record to 
the host. The most common use of this capability will be to send 
control commands and information requests to the host; for 
example* a HASP /*$DA command. 

Upon entering the COMMAND attention request, you are asked to 
enter the command to be sent. 

END : END is used to terminate the $RJE utility program. 

ENDSPOOL : ENDSPOOL is used to terminate the spooling of printer 
output (see SPOOL command). If a print data stream is being 
received and spooled when this command is entered* spooling 
will continue until the end of the data stream. Subsequent 
print data streams will then be printed on the defined printer. 






PRINTON : PRINTON is used to define the name of the terminal to 
be used for print output. If not specified, $SYSPRTR is 
assumed . 

PUNCHS and PUNCHQ : PUNCHS and PUNCHO are used to define a disk 
or diskette file to be used to receive punch data from the host. 
Card image punch data streams can be written to disk in two dif- 
ferent formats! source (S) or object (0). Source format will 
produce two 80-byte card image records per 256-byte disk record 
with the second card starting at byte location 129. Object for- 
mat will produce three 80-byte contiguous card image records 
per 256-byte disk record with the last 16 bytes set to 
hexadecimal zeros. The punch specification is automatically 
reset at the completion of each punch data stream so that mul- 
tiple punch data streams can be separated into different output 
data sets by issuing another PUNCHS or PUNCHO command. 



Upon entering the PUNCHS or PUNCHO attention request* you will 
be queried for the name and volume of the file to be used for 
punch output. If volume is not specified, the IPL volume is 
assumed. The file name and volume can also be specified as part 
of the PUNCHS or PUNCHO command, for example: 



PUNCHS PUNCH0UT,EDX001 
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$R 
ga 
ca 



JE examines the first cards received from the host and disre- 
rds those containing a X f 6A* in columns 1, 10, and 11 (indi- 
cating a HASP punch header card). $RJE must be modified by you 
to purge other than HASP punch header cards. 

RESET : RESET is used to reset functions that have not started 
operation in $RJE (for example buffered command images that 
have not yet been sent to the host, SUBMIT files that have not 
yet started transmission). RESET should be used with caution. 
If RESET is used, once a function is in process or if use of 
RESET overlaps a function initiation sequence, unpredictable 
results may occur. RESET conditionally prompts you with the 
following: 



ENTER RESET TYPE ( CO , SU , SP , PU ) : 

CO - COMMAND function 

SU - SUBMIT(X) function 

SP - SPOOL f unct i on 

PU - PUNCH(S or 0) function 



SPOOL : SPOOL is used to define a disk or diskette file to be 
used to receive printer data from the host. If not specified, 
$RJE will print received data directly to the printer. Once 
specified, all printer output will be spooled until an ENDSP00L 
command is issued. The utility programs $PRT2780 or $PRT3780 
can be used to print the contents of a spool file produced by 
$RJE2780 or $RJE3780, respectively. 

Upon entering the SPOOL attention request, you will be prompted 
for the name and volume of the disk or diskette file to be used 
for printer output. If volume is not specified, the IPL volume 
is assumed. The space allocated to this file must be at least 
equal in size (256-byte records) to the number of print lines 
to be spooled and there must be an even number of records in the 



i u u c J j-* u \j x c \j aiiu i 1 1 c= i c= in u 3 i. mc ail c v c: i i iiumuci u i i c ^ \j i u 3 111 in 

spool file. Once the spool file is full, the output reverts t 
the defined printer. The spool file name and volume may also b 
entered with the SPOOL command, for example: 



SPOOL SP00LFLE,WRKLIB 



A A, 
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may be sent using the /*CONCAT statement in the data stream 
itself. The files must be in the same format as that produced by 
the $EDIT1N and $FSEDIT utility programs (for example, two 
80-byte card image records per 256-byte disk or diskette record 
with the second card beginning at byte location 129). Two com- 
mand statements within the data stream are recognized by $RJE 
and are not transmitted to the host: 

1. /*END - signifies the end of the data stream to be sent. 

2. /*CONCAT f i lename , volume - signifies that the data stream 
is to be continued using the file specified. If volume is 
not specified, the IPL volume is assumed. Any number of 
files may be concatenated into one data stream. 

Upon entering the SUBMIT or SUBMITX attention request, you will 
be queried for the name and volume of the file to be sent to the 
host. If volume is not specified, the IPL volume is assumed. 
The submit file name and volume may also be entered with the 
SUBMIT or SUBMITX command, for example: 



o 



SUBMITX MYJOB,WRKLIB 
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> $L $RJE2780 

$RJE2780 35P, 00:00:00, LP= 7C00 

ENTER RJE LINE ADDRESS IN HEX: 5F 

DIAL HOST 

HOST CONNECTION ESTABLISHED 

> COMMAND 
ENTER COMMAND 
/*SIGNON REMOTEXX 
COMMAND READY TO SEND 
COMMAND SENT 

> PUNCHO 



ENTER PUNCH FILE NAME 
PUNCH FILE DEFINED 
> SUBMIT 



(NAME, VOLUME) : PCHOUT01 , EDX002 



ENTER SUBMIT FILE 
SUBMIT FILE READY 
FILE TRANSMISSION 
FILE TRANSMISSION 

> COMMAND 
ENTER COMMAND 
/*$DA 

COMMAND READY 
COMMAND SENT 

> PRINTON 
ENTER PRINTER 
PRTR1 DEFINED 

> COMMAND 
ENTER COMMAND 
/H$DA 
COMMAND READY 

> RESET 

ENTER RESET TYPE 
RESET COMPLETED 
PUNCHING STARTED 
PUNCHING COMPLETED 
LAST CARD PUNCHED WAS 

> SPOOL 



NAME CNAME, VOLUME) : 

TO SEND 

STARTED 

COMPLETED 



RJEJOB01,EDX002 



TO SEND 



NAME: PRTR1 
AS RJE PRINTER 



TO SEND 



/<" 



\ 



(CO,SU,SP,PU) : CO 



CARD 2 ON RECORD 



34 



Figure 7. Sample $RJE Session (Part 1 of 2) 
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ENTER SPOOL FILE NAME (NAME , VOLUME ) : SPOOL01, EDX002 
SPOOL FILE DEFINED 

> SUBMIT RJEJOB02 
SUBMIT FILE READY TO SEND 
FILE TRANSMISSION STARTED 
FILE TRANSMISSION COMPLETED 

SPOOLING STARTED 

PUNCH DATA BEING RECEIVED - NO PUNCH FILE DEFINED 
ENTER PUNCH FORMAT - S OR 0: S 

ENTER PUNCH FILE NAME ( NAME , VOLUME ) : PCHOUT02, EDX002 

PUNCH FILE DEFINED 

PUNCHING STARTED 

PUNCHING COMPLETED 

LAST CARD PUNCHED WAS CARD 1 ON RECORD 51 

> ENDSPOOL 
SPOOLING COMPLETED 

> COMMAND 
ENTER COMMAND 
/HSIGNOFF 

COMMAND READY TO SEND 
COMMAND SENT 

SRJE2780 ENDED AT 00:00:00 

> $L $PRT2780 

DSHNAME, VOLUME) : SPOOL01, EDX002 
$PRT2780 9P, 00:00:00, LP= 7C00 
PRINT TO SSYSPRTR? (Y OR N): N 
ENTER PRINTER NAME: PRTR1 

$PRT2780 ENDED AT 00:00:00 






Figure 8. Sample $RJE Session (Part 2 of 2) 
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CHAPTER 4. HOST COMMUNICATIONS FACILITY 



An application program coded in the Event Driven Language may 
communicate with the facilities of Installed User Program 
5796-PGH, the IBM Series/1 Host Communications Facility 
installed on an IBM System/370 running OS/MVT or 0S/VS2. The TP 
statement, a part of the Event Driven Language* provides you a 
means of performing the following general functions: 

• Write to a host data set. 

• Read from a host data set. 

• Submit a background job to the host system. 

• Obtain the time and date from the host system. 

• Set the occurrence of a Series/1 event so that it may be 
tested by a program running on the host system. 

• Test for the occurrence of an event which is set by the host 

system . 

• Erase an event which occurred on either the Series/1 or the 
host system . 

To configure your supervisor for the Host Communications 
Facility, refer to the section "System Configuration" in the 
System Guide . 



Chapter 4. Host Communications Facility 81 



Open Series/1 Data Sets 



A Series/1 may only have one host data set open at a time. If a 
second task attempts to open a data set* it will be placed in a 
queue of tasks waiting to use the TP facility. 

If the task currently using the TP facility attempts to open a 
second data set, then the currently open data set will automat- 
ically be closed and the second one will be opened. 



~~Y\ 



Host Data Set Naming Conventions 



Data set names referenced by a TP instruction must consist of 
an alphameric character string immediately preceded by one 
word which specifies the length of the name field. This is most 
easily done by using a labeled TEXT instruction to define the 
name, for example: 



DSN1 



TEXT 'XYZ.EXPl.DATA' 



Data set names follow standard host system naming conventions 
and must not exceed 44 characters in length (including delimit- 
ing periods). The name field must be padded on the right with 
blanks . 



V^-^y 



A partitioned data set and member name is specified 
string of the form dsname ( membername ) , for example: 



with 



PDSDSN TEXT f XYZ . EXP1 . DATA ( RUN1 ) f 



The maximum length of such a string is 54 characters. 

A data set name can be read into a text field from the console 
with the READTEXT instruction. 



82 SC34-0316 



Host Data Set Characteristics 



f I 



Host system data sets referenced in these functions must all be 
cataloged* single-volume, direct-access data sets* with fixed- 
or variable-length records. Either sequential data sets or 
members of partitioned data sets may be accessed. Fixed-length 
logical records must contain an even number of words. The data 
sets may be blocked or unblocked. If fixed blocked format is 
used* the block size must be an integral multiple of the log- 
ical record length ( L R E C L ) , not exceeding 13030. 

Either sequential data sets or members of partitioned data sets 
may be used for the SUBMIT function. Logical records must be 80 
bytes long and may be blocked or unblocked. If blocked records 
are used* the block size must be an integral multiple of 80. 



Host System Considerations 



o 



To ensure economical utilization of host main storage* while 
also providing large record capability, host main storage is 
shared by all Series/1 systems. The Host Communications Facil- 
ity IUP region allocation determines how much buffer space is 
available and therefore the upper limit for host BLKSIZE. It is 
still possible an error code 222 (sufficient I/O buffer space 
unavailable) may occur because of multiple and simultaneous 
requests for access to data sets with very large block sizes. 
This is very improbable* but you are cautioned to minimize the 
amount of realtime during which you use the Host Communications 
Facility in order to minimize the probability of interference. 



You are also cautioned to test for the specific error code 222 
(sufficient I/O buffer space unavailable) in response to a TP 
OPEN and, if received, to retry your request a little later. 



Record Sizes 



A large range of logical and physical record sizes is available 
to the application programmer. In selecting record size, you 
should understand that there is no absolute best choice. Howev- 
er, the following points are offered for your consideration. 

1 . The basic disk or diskette record size on the Series/1 is 
256 bytes. This is therefore a natural unit of measure for 
transfer to and from disk and a natural choice for a log- 
ical record size on the host. This is the default chosen 
for the TP instructions. 
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A host physical record (block) size of 1536 bytes yields an 
efficient (80 percent) utilization of host direct access 
storage on an IBM 3330 disk. This also yields moderate 
requirements for host buffer storage. 

For unformatted data* FORTRAN IV on the host system sup- 
ports either fixed-length unblocked data sets or 
variable-length blocked data sets. 

The larger the physical record being transferred between 
host and Series/1 (a host logical record), the higher the 
effective data transfer rate which will be achieved. Also, 
the larger the physical record (block) being transferred 
between host main storage and direct access, the higher the 
effective data rate. The maximum data rate is achieved when 
using track size records (13030 bytes for the IBM 3330 
disk) for both operations. 

The large physical records naturally require correspond- 
ingly large buffers in your program. In order to achieve 
overlapped I/O, multiple buffers sre required. 



Variable Length Records 



A variable length record is always prefixed by four bytes of 
control information. This is called a Record Descriptor Word or 
RDM. The structure of a variable format record is shown below. 



v_y 



LL 


00 


DATA 



The length (LL) field (bytes 1 and 2 ) describes the total 
length of the record in bytes and is therefore always four 
greater than the length of the data field. The field shown as 00 
(bytes 3 and 4 ) is reserved for use by the host system. 

When a variable format record is transferred from the host to 
Series/1, the total record, including the LL field, will be 
transferred. When a variable format record is to be transferred 
from Series/1 to the host, you must set the RDW to the proper 
value. 



Data Transfer Rates 



The data transfer rates which may be achieved between Series/1 
and the host is a function of the activity on the host and as 



c 
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such will vary somewhat from time to time. Of course* the speed 
of transmission is also a function of the type of physical con- 
nection used between the systems. In general, you should avoid 
implementing any functions in a manner which depends on specif- 
ic data rates between the host and Series/1. 



System Status Data Set 



The status functions (SET, FETCH, and RELEASE) provide a method 
of communication and therefore, of synchronization between 
programs in a distributed system environment. This function is 
implemented by using a shared system data set on the host com- 
puter. Programs on the host or satellite processors can commu- 
nicate by writing (SET), reading (FETCH), and deleting 
(RELEASE) records. 



jT> 



In the simplest case, one program (Program A) makes an entry in 
the System Status Data Set by invoking a SET instruction speci- 
fying an index and a key. Another program (Program B) would 
test for the existence of such an entry with a FETCH or RELEASE 
referring to the same index and key names and would receive a 
positive return code if the entry existed. After performing a 
SET, the first program (Program A) could periodically issue a 
FETCH. A companion program (Program B) on the other system 
might also be issuing a periodic FETCH for the agreed upon 
index and key. At the appropriate time, this program (Program 
B) could issue a RELEASE which would result in the first pro- 
gram (Program A) receiving a "not found" return code from its 
next FETCH. This could be interpreted as a notification by the 
companion program (Program B) that the message had been 
received. Figure 9 on page 86 graphically illustrates the 
previous explanation. 



The FETCH, SET, and RELEASE functions can be invoked from a 
user-written program using the TP commands or, through the use 
of the Event Driven Executive OHCFUTl utility. The return codes 
that could be returned are listed in the section "Return Codes" 
on page 102. 
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PROGA PROGRAM A PROGRAM A 

STATA STATUS PROGID,KEYA DEFINE STATUS ID & KEY 

* 

A TP SET, STATA SEND MESSAGE TO PROGB 

* VIA HOST 

Al TP FETCH, STATA, ERRORA CHECK IF PROGB RECEIVED 

* MESSAGE 

* FALL THRU IF KEY & ID STILL ON HOST 
* 

GOTO Al CONTINUE INTERROGATION 

ERRORA EQU * DELETE THE MESSAGE ON HOST 

PROGSTOP 
ENDPROG 
END 



PROGB PROGRAM B PROGRAM B 

STATB STATUS PROGID,KEYA DEFINE SAME STATUS ID & KEY 

* 

B TP FETCH, STATB, ERROR=ERRORB FETCH MESSAGE 

* 

* MESSAGE WAS FOUND AND IS DELETED, THUS SIGNALING PROGA 

* 

TP RELEASE, STATB 

GOTO END 
ERRORB GOTO B CONTINUE LOOKING FOR MESSAGE 

END PROGSTOP 

ENDPROG f "> 

END VV 



Figure 9. System Status Data Set Sample Program 



The System Status Data Set has DIRECT organization. Records are 
written into this data set with the SET function, tested for 
existence with the FETCH function, or tested and deleted with 
RELEASE. 

A STATUS entry has three possible logical parts, two of which 
are mandatory. These are: 

1 . Index entry 

2. Key field 

3. Data (optional 256-byte field) 

Index entries and key fields are each eight EBCDIC characters 
in length and have significance for the using programs. 
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The System Status Data Set has one 268-byte index record capa- 
ble of containing 22 separate index entries. An index entry has 
two parts. These are: 

• Index name - eight EBCDIC characters 

• Key pointer - a 4-byte relative record pointer to the first 
associated key field record. 

A key entry is a 268-byte record which has the following for- 
mat : 

1. Forward pointer - a 4-byte relative record number of the 
next key entry or zero if this is the last one 

2. Key name - eight EBCDIC characters 

3. Data - 256 bytes of optional data 

The next record pointer allows more than one key to be associ- 
ated with a given index. The next record pointer of the last key 
field will be set to zero to indicate the end of the chain. 



^"\ 



Logically* an unlimited number of key records may be associated 
with a single index. In practice, the limiting factor is the 
physical size of the data set. The distributed data set allows 
for a total of 94 key entries. 

The System Status Data Set format is defined and allocated dur- 
ing the installation of the Host Communications Facility 
Installed User Program. 

Appendix B of the IBM Series/1 Host Communications Facility 
Program Description and Operation Ma n ual , SH 20-1819, contains 
more details on the use of the System Status Data Set. 
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TP Statement 



The TP statement supports only the single line BSC adapter in 
point-to-point leased line mode. The following list shows the 
required TP statement, or required sequence of TP statements, 
to perform each of the general functions. These statements are 
coded in your Event Driven Language application program, which 
runs on the Series/1 end of the BSC link. 



Examples of Use 



1. Write data from the Series/1 to a host data set 



Requ i res J 


TP 
TP 
TP 


OPENOUT, . . . 
WRITE, . . . 
CLOSE, . . . 



2. Read data from a host data set to the Series/1 



Requires: 



TP OPENIN, 
TP READ,.. 
TP CLOSE,. 



V y 1 



3. Submit a background job to the host system 



Requires: TP SUBMIT,... 



4. Obtain the time and date from the host system 



Requires: TP TIMEDATE,... 
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5. Set, on the host system* the occurrence of a Series/1 
event* so that it may be tested by a program running on the 
host system . 



Requ ires: 



TP 



SET, . . . 



6. Test for the occurrence of 
ning on the host system. 



an event set by a program run- 



Requ ires: 



TP 



FETCH, . . . 



7. Erase the record, on the host system, of an event which was 
set by either the host system or the Series/1. 






Requires: 



TP 



RELEASE, . . . 
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TP Statement Syntax 



Each of the forms of the TP instruction is described starting 
with "TP CLOSE." The use of each function is shown in "Example 
Transfer a Series/1 Data Set to the Host" on page 105 and 
"Example Transfer a Host Data Set to the Series/1" on page 106. 
Certain standard information is described on the following 
pages . 



TP CLOSE 

TP CLOSE terminates a transfer operation. This instruction is 
used to terminate either an operation begun with TP OPENOUT,... 
or with TP OPENIN, 

Notes : 

1. If an error occurs, an open data set will be automatically 
closed by the system. The only time that a TP CLOSE must be 
issued is when a data set transfer is being terminated and 
no errors have occurred. For instance, this would occur if 
only 10 records were being written to or read from a data 
set capable of containing 20 records. 

2. The return code should always be tested after issuing a TP 
CLOSE because some errors will only be detected at this 
time; for example, 50 and 51. Return codes are shown in 
Figure 10 on page 102, Figure 11 on page 103 and Figure 12 
on page 104 . 

3. While you have an open data set, no one else will be able to 
use the facility. Use discretion in your operations. 

Syntax 



y 



label TP 

Required: CLOSE 
Defaults : None 
Indexab le : None 



CLOSE, ERR0R= 



Operands Description 

label The optional symbolic name of the TP statement 
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CLOSE Coded as shown. Specifies operation termination. 

E R R R = Use this operand to specify the first instruction 
of the routine to be invoked if an error condition 
occurs during the execution of this operation. If 
this operand is not specified, control will be 
returned to the next instruction after this one and 
you must test for errors. 



o 
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TP FETCH 



TP FETCH tests for the existence of a specific record in the 
System Status Data Set on the host system and optionally reads 
in the associated data record. 

Synta x 



label 

Required: 
Defaults: 



TP 



FETCH, st loc, length, ERR0R=,P2=,P3= 



FETCH, stloc 
length=0 
Indexable: stloc, length 



Operands 
label 
FETCH 
stloc 

length 



Desc r i pt i on 

The optional symbolic name of the TP statement. 

Coded as shown . 

The label of a STATUS instruction. Refer to the 
Language Referenc e for a description of this 
instruction. 

A count specifying the length, in bytes, of the data 
portion of the status record to be received. A count 
of zero indicates that no data is to be received. 
The maximum value of this field is 256. 



V J 



ERROR = 



Pn = 



Use this operand to specify the first instruction 
of the routine to be invoked if an error condition 
occurs during the execution of this operation. If 
this operand is not specified, control will be 
returned to the next instruction after this one and 
you must test for errors. 

The optional labels to be affixed to the stloc and 
length operands, respectively. 



^Ua*-^ 



92 SC34-0316 



TP OPENIN 

TP OPENIN prepares to read data from a host data set 
Syntax 



label 



TP 



OPEN IN, dsnloc, ERR OR =,P2 



Required: OPENIN, dsnloc 
Def au 1 ts : None 
Indexable: dsnloc 






Operands 
label 
OPENIN 
dsn loc 



ERROR= 



P2 = 



Descr i pt i on 

The optional symbolic name of the TP statement. 

Coded as shown. Specifies an input operation. 

The label of a TEXT instruction which specifies the 
fully qualified name of a host data set of standard 
format as detailed in "Host Data Set Naming 
Conventions" on page 82. 

This may be either (1) a sequential data set or (2) 
a partitioned data set with member name included. 

Use this operand to specify the first instruction 
of the routine to be invoked if an error condition 
occurs during the execution of this operation. If 
this operand is not specified, control will be 
returned to the next instruction after this one and 
you must test for errors. 

The optional label to be affixed to the dsnloc 
operand . 
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TP OPENOUT 

TP OPENOUT prepares to transfer data to a host data set 
Syntax 



labe 1 



TP 



OPENOUT, dsnloc,ERR0R=,P2= 



Required: OPENOUT , dsn loc 
Defaults: None 
Indexable: dsnloc 



Operands 
label 
OPENOUT 
dsn loc 



ERROR= 



P2 = 



Descr iption 

The optional symbolic name of the TP statement. 

Coded as shown. Specifies an output operation. 

The label of a TEXT instruction which specifies the 
fully qualified name of a host data set of standard 
format as detailed in "Host Data Set Naming 
Conventions" on page 82. 

This may be either (1) a sequential data set or (2) 
a partitioned data set with member name included. 

Use this operand to specify the first instruction 
of the routine to be invoked if an error condition 
occurs during the execution of this operation. If 
this operand is not specified, control will be 
returned to the next instruction after this one and 
you must test for errors. 

The optional label to be affixed to the dsnloc 
operand . 
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TP READ 

TP READ receives a data record from the host system 
Syntax 



label 



TP 



READ,buf fer, count, END=, ERROR =,P2=,P3= 



Required: READ, buffer 
Defaults: count=256 
Indexable: buffer, count 



Operands 

label 

READ 

buffer 



count 



END = 



ERROR= 



Pn = 



Description 

The optional symbolic name of the TP statement. 

Coded as shown. Specifies that a record is being 
rece i ved . 

The label of the data buffer into which the record 
is to be stored. This buffer should be generated 
with or conform to the specifications of a BUFFER 
statement specifying TPBSC. 

The maximum number of bytes which may be 
transferred. For variable length records, this 
includes the 4-byte RDW as shown in "Variable 
Length Records" on page 84. 

Use this operand to specify the first instruction 
of the routine to be invoked if an "End of Data Set" 
condition is detected (return code 300). If this 
operand is not specified, an EOD will be treated as 
an error . 

Use this operand to specify the first instruction 
of the routine to be invoked if an error condition 
occurs during the execution of this operation. If 
this operand is not specified, control will be 
returned to the next instruction after this one and 
you must test for errors. 

The optional labels to be affixed to the buffer and 
count operands, respectively. 
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TP RELEASE 



TP RELEASE deletes a specific record in the System Status Data 
Set on the host system and optionally reads the associated data 
record . 

Synta x 



/f~\ 



TP RELE AS E, stloc, length, ERR0R=,P2=,P3; 

RELEASE, stloc 
length=0 



label 

Required: 
Defaults : 
Indexable: stloc, length 



Operands 
label 
RELEASE 
stloc 

length 



ERROR= 



Pn = 



Description 

The optional symbolic name of the TP statement. 

Coded as shown . 

The label of a STATUS instruction. Refer to the 
Language Referenc e for a description of this 
i nstr uct i on . 

A count specifying the length, in bytes, of the data 
portion of the status record to be received. A count 
of zero indicates that no data is to be transmitted. 
The maximum value of this field is 256. 

Use this operand to specify the first instruction 
of the routine to be invoked if an error condition 
occurs during the execution of this operation. If 
this operand is not specified, control will be 
returned to the next instruction after this one and 
you must test for errors. 

The optional labels to be affixed to the stloc and 
length operands, respectively. 



f~\ 



V. 
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TP SET 



TP SET writes a record in the System Status Data Set on the host 

system. 



Syntax 



label 



TP 



SET, stloc, length, ERROR=,P2=,P3= 



Required: SET, stloc 
Defaults: length=0 
Indexable: stloc, length 



^^y 



Operands 
label 
SET 
st loc 

length 



ERROR= 



Pn = 



Descr i pt i on 

The optional symbolic name of the TP statement. 

Coded as shown . 

The label of a STATUS instruction. Refer to the 
Language Referenc e for a description of this 
instruction. 

A count specifying the length* in bytes, of the data 
portion of the status record to be transmitted. A 
count of zero indicates that no data is to be trans- 
mitted. The maximum value of this field is 256. 

Use this operand to specify the first instruction 
of the routine to be invoked if an error condition 
occurs during the execution of this operation. If 
this operand is not specified, control will be 
returned to the next instruction after this one and 
you must test for errors. 

The optional labels to be affixed to the stloc and 
length operands, respectively. 
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TP SUBMIT 

TP SUBMIT submits a job to the host batch job stream 
Syntax 



label 



TP 



SUBMIT,dsnloc,ERR0R=,P2= 



Required: SUBMIT, dsnloc 
Defaults : None 
Indexable: dsnloc 



Operands Descr i pt i on 

label The optional symbolic name of the TP statement. 

SUBMIT Coded as shown. 

dsnloc The label of a TEXT instruction which specifies the 
name of a host data set containing the job (JCL and 
optional data) to be submitted. 

This may be either: 

1. TEXT "dsname" for a sequential data set, or 

2. TEXT "dsname ( membername ) " for a partitioned 
data set . 

In systems with a HASP/Host Communications Facility 
interface, specifying DIRECT for dsnloc allows 
immediate transmission of data records to the job 
stream without employing an intermediate host data 
set. To use this facility, issue: 

TP SUBMIT, DIRECT 

followed by a series of 

TP WRITE, buf fer ,80 

instructions, one for each job stream record, ter- 
m i nated with a 

TP CLOSE 



v_ 



o 
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ERROR= Use this operand to specify the first instruction 
of the routine to be invoked if an error condition 
occurs during the execution of this operation. If 
this operand is not specified, control will be 
returned to the next instruction after this one and 
you must test for errors. 



P2 = 



The optional label to 
operand . 



be affixed to the dsnloc 



o 
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TP TIMEDATE 



TP TIMEDATE obtains the current time of day (hours* minutes, 
and seconds) and the date (month, day, and year) from the host 
system . 

Syntax 



label 



TP 



TIMEDATE,loc,ERR0R=,P2 



Required: TIMEDATE, loc 
Defaults : None 
Indexable: loc 



Operands 
label 
TIMEDATE 
loc 

ERROR= 



P2 = 



Descr i pt i on 

The optional symbolic name of the TP statement. 

Coded as shown . 

The label of the 6-word data area where time of day 
and date will be stored as hours, minutes, seconds, 
month, day, and year. 

Use this operand to specify the first instruction 
of the routine to be invoked if an error condition 
occurs during the execution of this operation. If 
this operand is not specified, control will be 
returned to the next instruction after this one and 
you must test for errors. 

The optional label to be affixed to the loc operand. 






o 



100 SC34-0316 



TP WRITE 

TP WRITE sends a data record to the host system 
Syntax 



label 



TP WR I TE, bu f f er , count, END=, ERROR =,P2=,P3= 



Required: WRITE, buffer 
Defaults: count=256 
Indexable: buffer, count 



f"\ 






Operands 

label 

WRITE 

buffer 



count 



END = 



ERROR= 



Pn = 



Descr i pt i on 

The optional symbolic name of the TP statement. 

Coded as shown. Specifies that a record is being 
sent . 

The label of the data buffer which contains the 
record to be transmitted. This buffer should be 
generated with, or conform to the specifications 
of, a BUFFER statement specifying TPBSC. 

The number of Series/1 bytes to be transferred. For 
variable length records, this includes the 4-byte 
RDW as shown in "Variable Length Records" on page 
84. 

Use this operand to specify the first instruction 
of the routine to be invoked if an "End of Data Set" 
condition is detected (return code 400). If this 
operand is not specified, an EOD will be treated as 
an error . 

Use this operand to specify the first instruction 
of the routine to be invoked if an error condition 
occurs during the execution of this operation. If 
this operand is not specified, control will be 
returned to the next instruction after this one and 
you must test for errors. 

The optional labels to be affixed to the buffer and 
count operands , respect i vely . 
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Return Codes 



Program execution will be halted until the operation is 
complete, and the first word of the TCB (taskname) must be 
tested to determine if the operation was successful. The return 
codes are shown in Figure 10, Figure 11 on page 103 and 
Figure 12 on page 104. 



Note : If an error is detected, 
automatically closed for you. 



an 



open 



data set i s 






Code 



Descr i pt i on 



Module 



-1 


Successf u 


1 


1 1 legal c 


2 


TP I/O er 


3 


TP I/O er 


4 


Loop i ng b 


5 


Host ackn 




code was 




or a NACK 


6 


Retry cou 




was a tim 


7 


Loop i ng w 




the host 


8 


The host 




an T E0T T 




was expec 


9 


Retry cou 




was a "mo 


10 


Retry cou 




was not a 




block che 


11 


Retry cou 




was a tra 


50 


1/0 error 


51 


I/O error 



1 complet i on 

ommand sequence 

ror 

ror on host 

idding for the line 

owledgement to request 

neither ACK0, ACK1, HACK, 

nt exhausted - last error 
eout; the host must be down 
hile reading data from 

responded with other than 

or an 'ENQ f when an f E0T f 

ted 

nt exhausted - last error 

dem interface check" 

nt exhausted - last error 
timeout, modem check, 

ck or overrun 

nt exhausted - last error 

nsm it overrun 
from last 1/0 in DSWRITE 
when writing the last buffe 



Super v i sor 
Super v i sor 
Superv i sor 
HCFCOMM 
Superv i sor 
Superv i sor 



Supervisor 
Superv i sor 
Superv i sor 

Superv i sor 
Supervisor 

Superv i sor 

DSCLOSE 
DSCLOSE 



100 Length of DSNAME is zero 

101 Length of DSNAME exceeds 52 

102 Invalid length specified for I/O 



HCFCOMM 
HCFCOMM 
HCFINIT 



V,.y 



Figure 10. TP Return Codes (Part 1 of 3) 
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Code 

200 

201 
202 
203 
204 
205 
206 

207 
208 
209 
211 
212 
213 
214 
216 

217 

218 
219 
220 

221 
222 



Description 



se 
se 
se 
se 



Data se 
control 
Invalid 
Data se 
Data 
Data 
Data 
Data 
device 
Vo 1 ume 
Device 
Data se 
Record 
Inva 1 i d 
Invalid 
Data se 
Data se 
no memb 
Data se 
a membe 
Error d 
The spe 
An I/O 
d i recto 
Invalid 
S u f f i c i 



t not on volume specified for 
ler 

member name specification 
t in use by another job 
t already allocated to this task 
t is not cataloged 
t resides on multiple volumes 
t is not on a direct access 

not mounted (archived) 
not online 
t does not exist 
format is not supported 

logical record length 

block s i ze 
t has no extents 

t organization is partitioned and 
er name was specified 
t organization is sequential and 
r name was specified 
uring OS/ OPEN 
cified member was not found 
error occurred during a 
r y search 

data set organization 
ent I/O buffer space unavailable 



Module 

HCFINIT 

DSOPEN 
DSOPEN 
DSOPEN 
DSOPEN 
DSOPEN 

DSOPEN 
DSOPEN 
DSOPEN 
DSOPEN 
DSOPEN 
DSOPEN 
DSOPEN 
DSOPEN 

DSOPEN 

DSOPEN 
DSOPEN 
DSOPEN 

DSOPEN 
DSOPEN 
DSOPEN 



300 End of an input data set 

301 I/O error during an OS/ READ 

302 Input data set is not open 

303 A previous error has occurred 



DSREAD 
DSREAD 
DSREAD 
DSREAD 



Figure 11. TP Return Codes (Part 2 of 3) 
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Code Description 

400 End of an output data set 

401 I/O error during an 05/ WRITE 

402 Output data set is not open 

403 A previous error has occurred 

404 Partitioned data set is full 



800 Index and key exist 

801 Index does not exist 

802 Key does not exist 
810 I/O error 



900 Index and/or key released 

901 Index does not exist 

902 Key does not exist 
910 I/O error 



lxxx An error occurred in a subordinate 
module during SUBMIT. f xxx' is 
the code returned by that module. 



Module 

DSWRITE 
DSWRITE 
DSWRITE 
DSWRITE 
DSCLOSE 



700 Index* key, and status record added SET 

701 Index exists, key and status added SET 

702 Index and key exist, status replaced SET 

703 Error - Index full SET 

704 Error - Data set full SET 
710 I/O Error SET 



FETCH 
FETCH 
FETCH 
FETCH 



RELEASE 
RELEASE 
RELEASE 
RELEASE 



S7SUBMIT 



_y 



Figure 12. TP Return Codes (Part 3 of 3) 
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Example Transfer a Series/1 Data Set to the Host 



In the following example, a Series/1 data set, which is entered 
by the user at program load time, is written to a 256-byte data 
set on the host. The user will be prompted for a target host 
data set . 






READ 



WRITASK PROGRAM TPOPEN , DS= (( SOURCE ,??) ) 
x 

* OPEN TP LINE 

TPOPEN READTEXT DSNAME,'HOST DATASET: » , PROMPT=COND 
TP OPENOUT,DSNAME 

IF (WRITASK, EQ,-1), GOTO, DSREAD OPEN OK? 
MOVE SNITCH, 3 ..TPOPEN ERROR 

GOTO ERRSW 

READ A RECORD FROM DATA SET 
DS1,BUFFER,ERR0R=ERR2,END=TPCL0SE 

WRITE A RECORD TO HOST 
WRITE, BUFFER, 256 

(WRITASK,EQ,-1) , GOTO, DSREAD . .OK? 
SWITCH, 1 . .WRITE ERROR 

TPCLOSE 
SWITCH, 2 . .READ ERROR 

* LOSE DATA SET AND PRINT MESSAGE AS APPROPRIATE 
TPCLOSE TP CLOSE 

GOTO (RET0,RET1,RET2,RET3) , SWITCH 

PRINTEXT T *****READ/WRITE SUCCESSFU L*****3 ■ 

PROGSTOP 
RET1 PRINTEXT f *****WRITE UNSUCCESSFUL*****3 f 

PROGSTOP 
RET2 PRINTEXT '*x***READ UNSUCCESSFU L*****3 ' 

PROGSTOP 
RETi PRINTEXT »x****TP OPEN UNSUCCESSFUL*****3 ' 

PROGSTOP 
SWITCH DATA F'0 f 
DSNAME TEXT LENGTH=40 
BUFFER BUFFER 256,TPBSC 

ENDPROG 

END 



x 
DSREAD 

x 

TPWRITE TP 
IF 

ERR1 MOVE 
GOTO 

ERR2 MOVE 



ERRSW 
RETO 
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Example Transfer a Host Data Set to the Series/1 



In the following example* a host data set which is entered by 
the user at the prompt "HOST DATASET: ", is read into a preallo- 
cated data set on a Series/1 volume. At program load time the 
user is prompted for the target Series/1 data set. 



READTASK 

x 

TPOPEN 



x 
TPREAD 



DSWRITE 

ERR1 

ERR2 
x 

TPCLOSE 

ERRSW 

RETO 

RET1 

RET2 

RET3 

SWITCH 
DSNAME 
BUFFER 



PROGRAM TPOPEN, 
OPEN TP LI 
READTEXT DSNAME, 
TP OPENIN, 
IF (READTA 
MOVE SWITCH, 
GOTO ERRSW 

READ A RE 
TP READ, BUFFER 
IF (READTASK, E 
IF (READTASK, E 
GOTO ERR2 

WRITE REC 
WRITE DS1, BUFFER 
IF (READTASK, 
MOVE SWITCH, 1 
GOTO ERRSW 
MOVE SWITCH, 2 
CLOSE TP LINE AN 
TP CLOSE 
GOTO (RET0,RET1 
PRINTEXT 'xxxxxR 
PROGSTOP 

PRINTEXT 'xxxxxW 
PROGSTOP 

PRINTEXT »xxxxxR 
PROGSTOP 

PRINTEXT f xxxxxT 
PROGSTOP 
DATA F'0 f 
TEXT LENGTH=40 
BUFFER 256,TPBSC 
ENDPROG 
END 



DS=( (TARGET, ??) 

NE 

'HOST DATASET: 

DSNAME 

SK,EQ,-1) ,GOTO, 

3 

CORD FROM HOST 

Q,-l),GOTO,DSWR 
Q, 300), GOTO, TPC 

ORD ON DISK 
,ERROR=ERRl 
EQ,-1) ,GOTO,TPR 



1 ,PROMPT=COND 

TPREAD OPEN OK? 
. .TP OPEN ERROR 



ITE 
LOSE 



. .OK? 
. .END? 



EAD ..OK? 
..WRITE ERROR 



D PRINT MESSAGE AS APPROPRIATE 



,RET2,RET3),SWI 
EAD/WRITE SUCCE 

RITE UNSUCCESSF 

EAD UNSUCCESSFU 

P OPEN UNSUCCES 



TCH 
SSFULxxx*x3 * 

ULxxxxxa f 

Lxxxxxa f 

SFULxxxxxS ' 



V_y 



<_y 
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SHCFUT1 Utility Program 



SHCFUT1 is a utility program that uses the Host Communications 
Facility on the Series/1 to interact with the Host Communi- 
cations Facility on the System/370. SHCFUTl contains four 
host-related data set functions. These are: 



• Read a data set from the host. 

• Write a data set to the host. 

• Submit a job to the host. 

• Status - Set» Fetch, and Release records in the System Sta 
tus Data Set . 

The table below lists the commands and their codes? 



£**\ 



? Help 

END End 

FEtch Fetch status 

RELease Release status 

READDATA Read host 

READ80 Read 80-byte records and write two 80-byte 

records in one disk sector 
READOBJ Read 80-byte records and write three 80-byte 

records in one disk sector 
SEt Set status 
SUbmit Submit a job 
WRite Write to host 



Notes : 



See "Host Data Set Naming Conventions" on page 82 and "Host 
Data Set Characteristics" on page 83. 

See "System Status Data Set" on page 85. Appendix B of the 
IBM Ser i es/1 Host Communications Facility Program 
Description and Operation Manual * SH20-1819, contains more 
deta i Is on its use . 

The Host Communications Facility IUP» program number 
5796-PGH, is required on the host System/370. 

Host Communications Facility must be installed and config- 
ured on the Series/1. 
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READDATA 



READDATA transfers a data set from the host to the Series/1. 
The host logical record size is assumed to be 256 bytes. 

There are three items of control information to be specified at 
the time of execution. These items are: 






DSl 



The 1-8 character name of the Series/1 data set 
to which data is to be transferred* and its vol- 
ume name* if not the IPL volume. 



Record Count 



The number of records to be transferred* 
beginning with the first. This would be used if* 
for example* only the first 10 records of a 
50-record data set are to be transferred. 



A count of zero is used to indicate 
entire data set is to be transferred. 



that the 



DSNAME 



The name of the host data set to be transferred. 



The following is a terminal printout of a typical run. In this 
example, all records (length = 256 bytes each) of the host data 
set "SI .EDX.TESTIN.DATA" (which contains 40 records) are 
transferred to the Series/1 data set "DATAFIL2". 



> $L 

PGM(NAME, VOLUME) : $HCFUTl 

DSl (NAME, VOLUME) : DATAFIL2, EDX0Q1 

$HCFUT1 8P, 08. 15.30, LP=4B00 

COMMAND (?): READDATA 

NO. OF RECORDS TO READ(0=ALL): 

DSNAME: SI . EDX. TESTIN . DATA 

END AFTER 40 

COMMAND (?): 



\ y 
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READ80 and READOBJ 



READ80 and READOBJ transfer 80-byte records from a host data 
set and store them in 256-byte Series/1 disk or diskette data 
set records . 



READ80 stores two 80-byte records per 256-byte disk record. 
The first 80-byte record is stored in the first 80 bytes of the 
disk record. The second 80-byte record is stored starting at 
byte 129 of the disk record. This format is compatible with the 
saved results of using SEDIT1N or SFSEDIT and is also the for- 
mat required for input to a language compiler or $ E D X A S M pro- 
gram preparation. READ80 is normally used to transfer source 
program modules from the System/370 to Series/1 disk. 




Both READ80 and READOBJ 
"READDATA" on page 108. 



are invoked in a manner similar to 
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SET, FETCH, and RELEASE 

The status commands are used to perform, from a terminal, any 
of the three functions, SET, FETCH, and RELEASE, on the System 
Status Data Set. See "System Status Data Set" on page 85 and 
Figure 11 on page 103 for STATUS return codes. 

The following is an example of the use of the SET function of 
$HCFUT1. STATUS return code 700 indicates that the index, key, 
and status record have been added. 



COMMAND (?): SE 
INDEX = TESTSET 
KEY = NEWRECD 
STATUS = 700 
COMMAND (?): 



The following are examples of the use of the FETCH and RELEASE 
functions. The FETCH return code of 802 indicates that that 
particular key does not exist. The RELEASE return code of 900 
indicates a successful release. 



COMMAND (?): FE 
INDEX = TESTSET 
KEY = MISSING1 
STATUS = 802 
COMMAND (?): REL 
INDEX = TESTSET 
STATUS = 900 
COMMAND (?): 
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SUBMIT 



SUBMIT causes a job to be submitted to the host job stream. See 
"Host Data Set Naming Conventions" on page 82 and "Host Data 
Set Characteristics" on page 83. 



The name of the host data set containing the job control lan- 
guage to be submitted is specified on the Series/1 terminal. 
The following is a sample of the terminal printout illustrating 
the use of SUBMIT to submit the data set "SI . EDX . TESTSUB . CNTL" . 



COMMAND 


(?) : SU 




DSNAME: 


SI. EDX. TESTSUB. 


CNTL 


JOB SUBMITTED 




ANOTHER 


JOB? N 




COMMAND 


(?) : 
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WRITE 



WRITE transfers a data set from the Series/1 to the host 
processor. Host data set naming conventions and character- 
istics are described in this chapter. The host logical record 
5 i ze is assumed to be 256 bytes. 

There are three items of control information to be specified at 
the time of execution. These items are? 



DS1 



The 1-8 character name of the Series/1 data set 
to be transferred* and its volume name* if not 
the IPL vol ume . 



Record Count 



The number of records to be transferred* 
beginning with the first. This would be used if* 
for example* only the first 10 records of a 
50-record data set are to be transferred. 



DSNAME 



A count of zero is used to indicate 
entire data set is to be transferred. 



that the 



The name of the host data set to which the data 
is to be transferred. The name will consist of up 
to 44 characters or* 54 characters if a member of 
a partitioned data set. 



The following is a terminal printout of a typical run. In this 
example, 28 records of the Series/1 data set "DATAFIL1" are 
transferred to the host data set "SI . EDX . TESTOUT . DATA" . 



c.y 



> SL SHCFUT1 
DSK NAME* VOLUME) tDATAFILl 
SHCFUT1 8P, 08. 15.20, 


LP = 


= 4B00 




COMMAND (?): WF 
NO. OF RECORDS 
DSNAME: Sl.EDX. 
END AFTER 28 


TO WRITE(0=ALL) : 
TESTOUT. DATA 


28 


COMMAND (?): 
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CHAPTER 5. MUL T I PLE TE RMINAL MANAGER 
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INTRODUCTION 

The Series/1 Event Driven Executive Multiple Terminal Manager 
is a program which provides support* via high-level functions* 
for transaction-oriented applications on a Series/1. In addi- 
tion* it provides the management of multiple terminals as 
needed to support these transactions and their various appli- 
cation programs. The user creates programs which interface 
with the Multiple Terminal Manager via CALL statements. The 
components of the Multiple Terminal Manager are the following: 

• A program/storage manager which controls the execution and 
flow of the application programs within a single program 
ar ea . 

• A terminal/screen manager which controls the presentation 
of screens and communications between terminals and appli- 
cation programs. 

• A file handling mechanism which simplifies the storage and 
retrieval of data on direct access devices. 

Note : The reader should be familiar with the terminology 
used in the discussion of the TERMINAL statement in the 
section "System Configuration" of the System Guide . The 
syntax of the CALL statements in this chapter can be found 
in the Language Reference . 
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HARDWARE REQUIREMENTS 

/On 

The minimum hardware configuration required for the Multiple \^J / 

Terminal Manager is as follows: 

• Series/1 processor (either 4952 or 4955) with 96KB storage 

• Disk storage device (either 4962 or 4963) 

• An Event Driven Executive SSYSPRTR device 

• 4978/4979/3101 or ASCII terminal 

A separate $SYSL0G device is also required for receiving system 
messages; this device should not be included in the Multiple 
Terminal Manager environment in that system messages may not be 
di splayed . 

Additional hardware that may be attached to the system: 

• 4978, 4979, or 3101 Models 1 or 2 terminal devices 

• ASCII terminals connected via: #7850 Teletypewriter Adapt- 
er, #1610 controller, #2091 controller with #2092 adapter, 
or #2095 controller with #2096 adapter. 

•4973 or 49 74 printers ^^ 

• Additional direct access devices (disk or diskette) 

• Additional storage 



SOFTWARE REQUIREMENTS 

The minimum software requirements for executing the Multiple 
Terminal Manager is the Event Driven Executive VI. 1. Addi- 
tionally, the Event Driven Executive utilities and program 
preparation facilities are required for program preparation 
and installation of Multiple Terminal Manager applications. 
The following is a list of the additional software supported by 
the Multiple Terminal Manager: 

• Indexed Access Method 

• COBOL 

• FORTRAN 

• PL/I 
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PROGRAM OPERATION OVERVIEW 



The Multiple Terminal Manager is a transaction processing sub- 
system which executes as an application 



menu;, transactions can consist ot single or muicipie opt 
prompts, and responses are processed by user applications pre 
pared explicitly for the Multiple Terminal Manager. 

Multiple Terminal Manager applications are processed in a mes- 
sage in/message out fashion and are automatically connected to 
a terminal when a transaction begins. The Multiple Terminal 
Manager, in turn automatically processes terminal I/O for Mul- 
tiple Terminal Manager applications. Multiple Terminal Manager 
applications execute within the program area managed by the 
Multiple Terminal Manager. The applications are provided pro- 
gram, terminal, screen and file management services via the 
Multiple Terminal Manager. 



Program Management 



o 



The program management facilities allow applications to manage 
programs while these programs perform their respective 
transactional processes within a single overlay area. Because 
all of the Multiple Terminal Manager application programs 
operate in the same area, the Multiple Terminal Manager program 
management facilities contain the support needed to allow mul- 
tiplex operation and sharing of the program area. The applica- 
tion programs interface with these facilities using the 
callable functions described in the following sections. 

The program management callable functions are: 

LINK: Load and Execute Program 

The LINK function allows an application program to complete its 
own execution by loading and executing some other application 
program . 

LINKON: Fetch Response and Execute Program 

The LINKON function is a combination of the functions provided 
by the ACTION and LINK functions; that is, it requests an oper- 
ator action and, when this action is complete, loads and exe- 
cutes some other application program. 
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CYCLE: Suspend Current Terminal Application 

The CYCLE function allows an application program to suspend its 
execution to allow other applications/terminals to become 
active. 



/f 



MENU: Return to Multiple Terminal Manager Control 

The MENU function allows the application program to abort its 
own operation and return control to the Multiple Terminal Man- 
ager base program. The operator selection menu is then dis- 
played on the terminal. 

The application programs using these program/storage manage- 
ment facilities will always have the following four items asso- 
c i ated with them : 

Application Program: This is the user-written code that per- 
forms the transaction processing as required by the user. It 
resides in the PRGRMS volume and is loaded into the in-storage 
program area by the manager. 

Swap Out Data Set: Resides on MTMSTORE , MTMSTR . This data set is 
used by the manager to save programs and data across calls to 
ACTION, LINK, LINKON, CYCLE, and WRITE. 

Input Buffer: This buffer contains either the data last entered 
by the operator when the current part of the application pro- 
gram was entered or, the protected characters of the screen 
display that the application program is preparing for the next 
dialogue with the operator. This buffer is allocated by the 
Multiple Terminal Manager and is normally 2048 bytes in length. 

Output Buffer: This buffer contains the unprotected characters 
of the screen display that the current application program is 
preparing for the next dialogue with the operator. These unpro- 
tected characters can either be default values, or values sup- 
plied by the application program. This buffer is allocated by 
the Multiple Terminal Manager and is 1024 bytes in length. 



116 SC34-0316 



Terminal/Screen Management 

The terminal/screen management facilities provide you with a 
simplified method of performing the terminal handling func- 
tions that your application program may require. These facili- 
ties are described as follows: 

ACTION: Fetch Operator Response 

The ACTION function allows the application program to display a 
screen on the terminal and then obtain operator input from that 
display. 

SETPAN: Retrieve a Screen Image from the SCRNS Volume 

The SETPAN function allows the application program to request a 
specified screen be retrieved from the SCRNS volume and loaded 
into the Input and Output Buffers. 

SETCUR: Move Cursor to Specified Position 

The SETCUR function allows the application program to reset the 
character position at which the terminal/screen manager will 
display the cursor when the screen is displayed. 



o 



BEEP: Set Audible Alarm 

The BEEP function allows the application program to activate 
the audible alarm, if this feature is supported by the termi- 
nal, on the next output as a signal to the terminal operator. 



CHGPAN: Change Panel 

The CHGPAN function is used to notify the terminal manager of 
changes to the number of protected/unprotected characters of a 
screen in the input buffer. As a result of this function, the 
terminal manager will know how many unprotected data charac- 
ters to write on the next output operation. This function 
allows an application program to dynamically modify or create a 
screen image. 



| FTAB: Describe Unprotected Input Fields 

The FTAB function is used to set up a table that describes the 
unprotected input fields placed in the Input Buffer after a 
SETPAN or CHGPAN is issued. This function is useful in cursor 
positioning. 
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WRITE: Output to an ASCII Terminal 

This function is provided for those applications which utilize 
ASCII terminals such as the Teletype* ASR 33/35. This function 
executes similar to the functions described in the section 
"Program Management" on page 115, in that the application 
program does not remain in storage while the buffer is being 
written; hence, the manager returns control to the calling 
application program at the next sequential instruction. 

* Trademark of the Teletype Corporation 






File Management 



The file management facilities of the Multiple Terminal Manag- 
er provide common, easy-to-use support for all disk 
data-transfer operations as needed for the 
transaction-oriented application programs. These facilities 
provide support for both indexed and direct files under the 
control of a single callable function. The file management 
facilities consist of the FILEIO function. 

FILEIO: Perform Disk I/O 

This function allows the application program to perform read 
and write operations to disk using either indexed or direct 
access i ng . 



V 



J, 



Multiple Terminal Manager Operation 



The Multiple Terminal Manager is invoked using the Event Driven 
Executive $L command ( $ L $MTM , PRGRMS ) . Nhen this command is 
issued, the Multiple Terminal Manager program manager is 
loaded into storage and activated. The first program activated 
by the program manager is the Multiple Terminal Manager 
initialization program. 



4T\ 
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Multiple Terminal Manager Initialization Program 



This program determines the number of terminals that are being 
controlled and prepares the tables and in-storage control 
blocks necessary to support those terminals. The initializa- 
tion program LOADs and initializes a terminal server for each 
terminal that is to be controlled by the Multiple Terminal Man- 
ager. When initialization is complete* control is returned to 
the program manager. 



Terminal Server Programs 



The terminal server programs perform all input /output and 
interrupt handling functions for those terminal devices oper- 
ating under the control of the Multiple Terminal Manager. There 
is one terminal server program for each terminal assigned to 
the Multiple Terminal Manager. 



Application Program Manager 



o 



The application program manager controls the contents of the 
program area and the execution of programs within that area. 



Multiple Terminal Manager Utilities 



The utility program support provided with the Multiple Termi- 
nal Manager consists of operator service functions which 
assist you in the operation of your Multiple Terminal Manager 
system. These utilities are described as follows: 

Terminal Connection Facilities: The Multiple Terminal Manager 
supervisor program provides the operator with the facilities 
to disconnect and reconnect terminals during the normal Multi- 
ple Terminal Manager operation. These services are performed 
by the following operator commands: 

DISCONNECT : Turn Off Specified Terminals 

This facility allows the operator to shut down all or 
individually-specified terminals on the Multiple Terminal Man- 
ager system. If the operator requests a terminal, which is cur- 
rently involved in a transaction, to be disconnected, that 
terminal will be allowed to complete its associated trans- 
action before being disconnected. 
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RECONNECT : Turn On Specified Terminals 

This facility allows the operator to restore a 
terminal (via DISCONNECT) back into operation. 



d i sconnected 



Terminal Activity Report: This report utility allows the oper- 
ator to display the names and current status of the terminals 
under control of the Multiple Terminal Manager. 

Programs Report: This report utility allows the operator to 
display the names and sizes of Multiple Terminal Manager appli- 
cat i on programs . 

Screens Report: This report utility allows the operator to dis- 
play screen formats developed for Multiple Terminal Manager 
applications. 



Si gn-On/Sign-Off 



The Multiple Terminal Manager provides an optional facility to 
support operator sign-on and user provided sign-off. This sup- 
port is provided when the Multiple Terminal Manager user wishes 
to restrict the use of the Multiple Terminal Manager system to 
only user-specified authorized personnel. 



Data Files 



The Multiple Terminal Manager maintains several files on disk 
to assist in the operation of the program and its users. The 
following is a list of these data files: 



.J 



SCRNS Volume 



This volume contains the 
displays which are built by 
Executive SIMAGE utility. 



formatted 
the Event 



screen 
Dr i ven 



TERMINAL Fi le 



This file describes the terminals that are to be 
controlled by the Multiple Terminal Manager. 



PRGRMS Volume This volume contains the Multiple 
Manager and user application programs. 



Terminal 



MTMSTORE Fi le 



This file is used by the program manager as a 
work file primarily for saving and restoring 
programs across calls to the Multiple Terminal 
Manager . 
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APPLICATION PROGRAM INTERFACE 



The Multiple Terminal Manager provides the Series/1 Event 
Driven Executive user with a set of high-level functions 
designed to simplify the definition of "transaction oriented" 
app 1 i cat i ons , such as inquiry, file update* data collection, 
and order entry. 

"Transaction oriented" means that program execution is driven 
by operator actions, typically, responses to prompts from the 
system. For example, a program executing under control of the 
Multiple Terminal Manager displays a "menu" screen offering 
the operator a choice of functions. Based on the operator's 
selection, the application program then performs processing 
operations, such as reading information from a data file, dis- 
playing the data at the terminal, and waiting for the next 
response . 

This "prompt-response-process" cycle between the Series/1 pro- 
gram and the terminal operator is the basic principle for the 
design of applications using the Multiple Terminal Manager. 

The terminal manager simplifies such transactions by: 



o 



Automatically allocating input and output buffers for the 
application program. 

Performing I/O operations to access fixed screen formats 
from the screen file. The term "screen" in this discussion 
refers to the image which is displayed on the screen of an 
IBM 4979, 4978, or 3101 (in block mode) terminal. Fixed 
screen formats consist of protected data and definitions 
of possible areas for data input. On other systems, these 
are referred to as "Maps", "Formats", or "Panels". Screens 
are built via the Event Driven Executive $IMAGE utility. 



• Returning control to the user program to allow modifica- 
tion of the buffers containing the screen (if desired). 

• Performing the set of I/O operations involved in writing 
the screen to the terminal, filling in unprotected fields 
with user-defined output data, and reading the data 
entered by the operator before returning control to the 
application program that requested the action. (The termi- 
nal manager assumes that each ACTION request involves both 
output and input operations, thus eliminating the need for 
the application program to make separate requests). 

In addition, the Multiple Terminal Manager provides storage, 
file, and program management services, terminal transaction 
statistics, and sign on/off facilities for password vali- 
dation. Error recovery for I/O and program check conditions are 
provided by the Event Driven Executive. 
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Series/1 Multiple Terminal Manager applications can be written 
in EDL, assembler language, COBOL, FORTRAN IV, or PL/I. Disk 
I/O can be performed by an application program using indexed or 
direct access methods. Terminal support is provided for local- 
ly attached IBM 4979, 4978, and 3101 display terminals and 
ASCII compatible terminals attached via the #7850, #1610, 
#2091 with #2092, or #2095 with #2096 adapters. See Figure 1 on 
page 6 for a description of devices and attachments. 



Considerations for the IBM 3101 Model 2 Terminal 



The Multiple Terminal Manager supports the IBM 3101 Model 2 
terminal in full screen mode ("block mode"). This support is 
only for Multiple Terminal Manager based application programs; 
other applications are not supported. In particular, screen 
design using the Event Driven Executive $ I M A G E utility must be 
performed on a 4978 or 4979. Throughout this chapter, any dis- 
cussion of the 3101 refers to the Model 2 operating in block 
mode unless specified otherwise. 



3101 support performs a subset of the functions equivalent to 
the support for IBM 4978 and 4979 terminals. That is, from the 
programming perspective, the 3101, 4978, and 4979 terminals 
are functionally very similar. However, they are operationally 
different in that the 3101 uses "attribute characters" to 
define fields. Multiple Terminal Manager support for the 3101 
places an attribute character just prior to and following each 
input field, and at the first position on the screen. 



v.,y 



Attribute characters appear as protected blanks on the display 
screen. Hence, the characters preceding and following an input 
field shall each appear as a protected blank. The same is true 
of the first character on the screen. These attribute charac- 
ters should be taken into account and allowed for when design- 
ing screen images. 

The maximum number of unprotected fields that can be displayed 
is 127. 

Any invalid (unprintable) characters encountered by the 3101 
will cause the alarm to ring. This condition might occur, for 
instance, when displaying a non-EBCDIC disk or diskette 
record. The Multiple Terminal Manager will convert to blanks, 
any nulls (X'00 f ) found in an unprotected data stream to help 
avoid this condition. 
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The keys on the 3101 are labelled differently than the 4978 and 
4979. The SEND key performs the same function as the ENTER key. 
Furthermore, the Program Function keys on the 3101 require that 
the ALT key on the lower right hand side of the keyboard be 
pressed as well as the appropriate numeric key. The PF6 key 
when pressed (hardcopy screen print) however, will not cause 
the screen image to be printed. 



Multiple Terminal Manager Components 

Major components of the Multiple Terminal Manager for the 
application programmer are: 

• Functions (callable routines) 

• User application programs 

• TERMINAL f i le 

• Screen formats 



o 



The functions provided by the Multiple Terminal Manager are 
callable routines that perform terminal, disk and diskette 
input/output operations and, control the execution of applica- 
tion programs. Program execution and terminal I/O are combined 
in most instances; for example, the LINK function causes a new 
program to be loaded and executed. If the current screen format 
has not yet been displayed, LINK also causes the screen to be 
written to the terminal. 



The program-execution control and terminal I/O functions 

include! 

• A routine (ACTION) to initiate the "prompt-response" ter- 
minal I/O operation 

• Two routines (LINK and LINKON) to link to a new program 
from the currently executing program 

• A routine (MENU) to terminate program execution and return 
control to the Multiple Terminal Manager 

• A routine (CYCLE) to voluntarily give up control of the 
program area to other users. This allows a user-controlled 
form of time sharing. 

In addition, the following functions are used with 4978, 4979, 
or 3101 terminals. These routines can be executed prior to a 
CALL ACTION to initiate a terminal I/O cycle: 

• A routine (SETPAN) to retrieve a screen into the input and 
output buffers 
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• A routine (SETCUR) to override the initial cursor position 
defined for that screen format 

• A routine (BEEP) to request the audible alarm (if avail- 
able) be sounded on the next terminal I/O cycle 

• A routine (CHGPAN) to notify the terminal manager of 
changes to a screen before it is written 

• A routine (FTAB) to build a table which describes the posi- 
tion and length of unprotected fields in the Input Buffer. 

For the ASCII terminals* the following functions are provided: 

• A routine (ACTION) to write to the terminal and read a 
reply. 

• A routine (WRITE) to write to the terminal without waiting 
for an operator response. Multiple writes may be used to 
write lengthy messages, with the last message being writ- 
ten via ACTION. 

• A routine (BEEP) to cause a bell character to be included 
in the next output line. 

The disk I/O function provides the following for disk and 
diskette files: 

• Automatic open of the requested file 

• Indexed Access Method file support 

• Direct file support 

• Storage conservation through automatic open and close 
f unct i ons 

User application programs can be executed by the operator via a 
selection from the primary menu or by a program via a call to 
LINK or LINKON. A primary menu is used only for program 
selection. The application programmer/terminal operator need 
only specify the program name. The Multiple Terminal Manager 
performs the operations necessary to load the program and con- 
trol its execution. User programs reside in the volume PRGRMS. 

The TERMINAL file is another basic element that describes the 
terminals to run under the terminal manager. In this file* the 
user specifies the terminal type, the name of the terminal, the 
screen to be used as the primary menu screen, and whether or not 
sign-on is required. The TERMINAL file provides flexibility to 
the user; that is, terminals can be added or deleted without 
rebuilding the terminal manager. The TERMINAL file resides in 
the volume PRGRMS . 






jj 
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Screen formats are used by application programs and the Multi- 
ple Terminal Manager itself. Each screen is a data set in the 
volume SCRNS and defines protected fields and default unpro- 
tected fields. The following screens are predefined in the 
SCRNS volume: 

IPLSCRN The initial program load (IPL) screen that is 
displayed when the Multiple Terminal Manager task 
set starts . 

SCRNSREP Used by the Screens Report Utility 

SIGNONSC The sign-on screen (displayed if a sign-on procedure 
is specified for the terminal). 

MENUSCRN A sample primary menu screen for program selection; 
however* the user can select any screen as a menu 
screen . 

These screens are provided as samples and can be modified to 
suit individual requirements. You can define additional 
screens by using the Event Driven Executive OIMAGE utility. 

The following are examples of the predefined screens in the 
SCRNS volume . 



o 



IPLSCRN 



EVENT DRIVEN EXECUTIVE 
MULTIPLE TERMINAL MANAGER 



HIT ENTER OR A FUNCTION KEY TO START THE MULTIPLE 
TERMINAL MANAGER FOR THIS TERMINAL. 



IPLSCRN * 
x 
x 
x 
x 
x 
x 
x 
x 
x 
x 



5719-MS1 COPYRIGHT IBM CORP 1979 
xxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxx 



The next example shows the sign-on screen. 
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SIGNONSC 
xxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxx 



X 
X 
X 
X 

x SSSSSS 
xS S 

* SSS 
x SSSS 
xS S 
x SSSSSS 
x 

X 

* #???????? 

X 
X 



SIGNON 



EVENT DRIVEN EXECUTIVE 
MULTIPLE TERMINAL MANAGER 



IIIIIIII 

I 

I 

I 

I 
IIIIIIII 



GGGGGG N N OOOO N N 

G G NN NO NN N 

G NNNO ONNN 

G GGNNNO ONNN 

G GNNNO ONNN 

GGGGGG N N 0000 N NN 



PASSWORD ==> ???? 



xxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxx 
This last example is the MENUSCRN. 

xxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxx 
x MENUSCRN x 

x ENTER PROGRAM NAME ==> x 

X X 

x EVENT DRIVEN EXECUTIVE x 

x MULTIPLE TERMINAL MANAGER x 

x x 

x VALID PROGRAM NAMES : RECONNECT DISCONNECT PGMRPT x 

x REPORT SCRNSRPT * 

x x 

x PRIMARY MENU FOR FULL SCREEN TERMINALS x 
xxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxx 

Errors encountered by the Multiple Terminal Manager in the 
primary menu mode are written protected at the first 20 charac- 
ter positions of a screen. User-written primary menus (defined 
by the TERMINAL data set) should be designed with this taken 
into account. 

The Multiple Terminal Manager responds to an interrupt from a 
terminal by loading the requested program specified by program 
name or program function key selection. The terminal manager 
routes subsequent operator entries to the associated program. 
Two program function keys are reserved: 

• PF3 signals the Multiple Terminal Manager to terminate the 
current program and display the menu screen. 

• PF6 signals Event Driven Executive to print the contents of 
the current screen on the device specified by the HDCOPY 
parameter of the TERMINAL statement for 4978/4979 termi- 
nals only. Normally, this device is the device specified 
for $SYSPRTR. 



'xj 
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Program Execution 



The Multiple Terminal Manager uses a single-thread approach to 
program execution* that is, only one application is resident at 
one t i me . 

When a program is initially requested for execution (terminal 
operator selects by name or PF key), a copy of the program is 
loaded into the terminal manager program area. 

When the program requests an operator response* the program is 
swapped out to disk and other terminals may use the program 
area while the operator is keying in new data. When the 
response is completed and the program area is available* the 
program is read into the program area from the swapped out data 
set and the program is given control at the next sequential 
instruction after the instruction that caused the swap out. The 
swap data set is MTMSTORE residing on the volume MTMSTR. 



User Program Organization 



o 



All programs must be written to operate in a conversational 
mode. That is, each program (or linked sequence of programs) is 
expected to receive data from a terminal and then send data 
back to the same terminal. 



Upon initiation, each user program automatically 
list of parameters. The parameters are! 



rece i ves 



Input Buffer Address 



This is the address of a buffer used for two distinct purposes: 
to contain the protected data defining a screen format before 
an ACTION and, to contain the data input from the terminal 
after an ACTION. After a call to SETPAN , the Input Buffer con- 
tains a 24 X 80 (1920) byte image of the screen, where unpro- 
tected fields are defined by strings of null characters 
(zeroes). A call to ACTION writes the screen image from the 
Input Buffer to the terminal. After the operator presses ENTER 
or a PF key, ACTION reads the data found in the unprotected 
fields into the Input Buffer. The input data fields are contig- 
uous and start at the beginning of the buffer. Input from ASCII 
terminals (such as teletypewriters) is read from the device 
with the change-of-di recti on character removed and backspace 
characters converted to a logical backspace in the Input Buffer 
(that is, backspace characters and a corresponding number of 
characters preceding them are not in the buffer). This buffer 
is 2048 bytes in length; however, only the first 1920 bytes are 
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used for protected output. The remainder of the buffer contains 
unusable information and is to be ignored. 

Note : The output function described above is also performed by 
CYCLE, LINK, and LINKON; of these, only LINKON also performs 
the input function. 

Initially, this buffer contains the characters entered on the 
terminal's menu screen for the first entry to a program. The 
name of the program must be the first eight characters. Addi- 
tional characters are not used by the manager but are passed to 
the program. These extra characters can be used for programs 
which minimize operator interaction by allowing the operator 
to enter a complete request on the menu screen and thus avoid 
the need for intermediate menus or prompts. 



/f\ 



Output Buffer Address 



This is the address of a buffer which is also used for two pur- 
poses. It contains "default data" to be written by ACTION into 
the unprotected portions of the screen. That is, a call to 
SETPAN reads concatenated data defined by $IMAGE into the Out- 
put Buffer. A subsequent call to ACTION writes the data from 
the buffer to the unprotected fields. If more characters are in 
the Output Buffer than there are unprotected positions on the 
screen, the excess characters are lost. The Output Buffer is 
set to blanks after a return from CALL ACTION. 

The Output Buffer is also used for passing data between pro- 
grams, when one LINKs to another. Prior to a LINK to another 
program, a program may store data in the Output Buffer. The 
second program will find that data in its Output Buffer. 



V 
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Terminal Environment Block (TEB) 



This is the address of a control block which contains informa 
tion about the terminal that initiated this program. 



Interrupt Information Bvte (IIB) 



This is the address of a word (16 bits) in storage containing, 
in the low-order half of the word, a code indicating the status 
of the prior I/O to or from this terminal. 



Vv Ly 
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For a 4978/4979/3101, this is always the numeric value repres- 
enting the interrupting key which was pressed as part of an 
operator response. Since there is no WRITE available to 
4978/4979/3101 this code never reflects the status of an output 
oper at i on . 

For ASCII terminals, this value is the return code from a 
READTEXT operation issued by the Multiple Terminal Manager. 

The following figure provides a programmer's view of the con- 
tents of the Input and Output Buffers at various stages in the 
terminal manager operation cycle. 






BUFFER CONTENTS UPON 
ENTRY TO APPL PROGRAM 


INPUT BUFFER 


OUTPUT BUFFER 


FROM CALL ACTION 


UNPROTECTED DATA 
READ FROM SCREEN 


BLANKS (X'40') 


FROM CALL LINK 


BLANKS (X f 40 T ) 


UNCHANGED FROM 
CALLING PGM 


FROM CALL LINKON 


UPROTECTED DATA 
READ FROM SCREEN 


BLANKS (X T 40 f ) 


FROM CALL CYCLE 


BLANKS (X*40') 


UNCHANGED 


FROM CALL SETPAN 


PROTECTED DATA FROM 
NEW SCREEN PANEL 


UNPROTECTED DATA 
FROM NEW SCREEN 
PANEL 



ACTION TAKEN UPON 
BUFFER CONTENTS BY 
FUNCTION CALL 


INPUT BUFFER 


OUTPUT BUFFER 


BY CALL ACTION 


WRITTEN PROTECTED 
IF CALL SETPAN 
HAD BEEN ISSUED 


WRITTEN INTO 
UNPROTECTED 
FIELDS ON SCREEN 


BY CALL LINKON 


SAME AS BY CALL 
ACTION 


SAME AS BY CALL 
ACTION 


BY CALL LINK 


SAME AS BY CALL 
ACTION 


SAVED 


BY CALL CYCLE 


SAME AS BY CALL 
ACTION 


SAME AS BY CALL 
LINK 



Program Contents During 4978/4979/3101 Buffer Operation 
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Controlling the Logic Flow of Programs 



Program Calling Parameters: Application programs use the EDL 
parameter passing facilities for passing parameters to the 
Multiple Terminal Manager. 



/f~"\ 



For example : 

CALL 



SETPAN, (SCRNX), (RC) 



SCRNX DC CL8 V SCRN10 V SCREEN PANEL NAME 
RC DC F T f RETURN CODE FIELD 



This example passes the addresses of the screen name and return 
code field to the Multiple Terminal Manager screen manager. 

Five callable functions are provided to control I/O to termi- 
nals and to control the execution of user programs. They are 
ACTION, LINK, LINKON, WRITE, and CYCLE. 

ACTION and WRITE perform terminal I/O. LINK and LINKON control 
the loading of user programs to service the current or the next 
operator input, respectively. CYCLE provides a method of time 
sharing the program area. 



V 



CALL ACTION 



CALL ACTION, (buffer), ( length), (crlf) 



All parameters for all languages are one 16-bit word in length, 
unless otherwise specified as character strings. 

ACTION parameters: 

buffer A buffer of EBCDIC text of any length. 

The number of characters in the buffer. 



length 
crlf 



A binary value of 1 specifies that the terminal is to 
be issued a carriage return and line feed (CRLF) 
after the message is sent. Any other value results in 
no CRLF being sent. 
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For ASCII terminals this routine* 

1. Writes the specified buffer contents to the terminal 

2. Waits for the operator to respond 

3. Reenters the current program at its next sequential 
instruction after the CALL ACTION 



CALL ACTION 



The Input Buffer is written protected to the screen if a CALL 
SETPAN or CALL CHGPAN command was executed previously during 
this transaction. The Output Buffer is written into the unpro- 
tected fields on the screen. The terminal then waits for opera- 
tor input and reenters the current program (with operator input 
in the Input Buffer) at the next sequential instruction after 
CALL ACTION. (For IBM 4978/4979/3101 displays, a parameter 
list is ignored if specified.) 



CALL LINK 



o 



CALL LINK, (pgmname) 



LINK causes the named program to be loaded and executed (re- 
placing the current program). 

| During the link, IBM 4978/4979/3101 terminals for which a 
SETPAN or CHGPAN has been issued will have the Input Buffer 
displayed. The Output Buffer is passed unchanged to the next 
program . 

The program being linked to receives the standard parameter 
list for application programs (Input Buffer, Output Buffer, 
TEB, IIB) . 

LINK parameters : 

pgmname An 8-byte (right padded with blanks, if necessary) 
program name . 

If the program name is invalid, control returns to the next 
sequential instruction in this program; therefore, any return 
to the user from CALL LINK is an error condition. 
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CALL LINKON 



CALL LINKON, (pgmname) 






LINKON provides a combined ACTION and LINK function. When the 
operator has entered the requested information, the named pro- 
gram is entered at its entry point with the Input Buffer con- 
taining the unprotected characters from the screen or all 
entered characters from an ASCII terminal. 

LINKON parameters : 

pgmname An 8-byte (right padded with blanks, if necessary) 
program name . 



CALL CYCLE 



CALL CYCLE 



When CALL CYCLE executes, the program may be swapped out as all 
other applications are given an opportunity to process inputs. 
The Output Buffer is preserved and the contents of the Input 
Buffer are lost (set to blanks). If a SETPAN or CHGPAN has been 
executed, the screen in the Input Buffer is displayed protected 
at this time to free up the Input Buffer. 

After all other terminals have processed their inputs, the pro- 
gram is swapped into the program area and control is returned 
to the next sequential instruction after the CALL CYCLE. 



V 
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Communicating with ASCII Terminals 



The Multiple Terminal Manager provides CALL NRITE to satisfy 
operator interaction to ASCII terminals for multiple output 
messages . 



CALL WRITE 



CALL WRITE, (buffer), (length), (crlf) 



f**\ 



CALL WRITE is for ASCII terminals only. It writes the specified 
buffer contents to the current terminal. While writing, other 
terminals are permitted to operate. When I/O is complete, the 
current user program is reloaded and reentered at the next 
sequential instruction after CALL WRITE. 

WRITE parameters: 

buffer A buffer of EBCDIC text of any length. 

length One word containing the number of characters in the 
buffer . 

crlf A binary value of 1 specifies that the terminal is to 
be issued a carriage return and line feed (CRLF) 
after the message is sent. Any other value results in 
no CRLF being sent. 

If CRLF is not equal to 1, trailing blanks in the buffer are 
transmitted to permit you to position the terminal cursor for 
the next message or operator response. 

The Multiple Terminal Manager does not keep track of current 
terminal cursor or carriage position. No CRLF is inserted if, 
due to messages without CRLF or a buffer size larger than the 
terminal line length, the right margin is reached. 

Upon completion, the contents of the buffer are unchanged. 

If executed by an IBM 4978/4979/3101, control returns imme- 
diately to the caller. 

No operator entry is permitted (see ACTION if operator entry is 
requ i red ) . 
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I Communicating with IBM 4978/4979/3101 Displays 



The Multiple Terminal Manager provides the following callable 
functions for specific control of the IBM 4978/4979/3101 dis- 
play i 



SETPAN - Retrieve a screen image 

CHGPAN - Reset the unprotected character count 

SETCUR - Set the cursor position 

BEEP - Sound the audible alarm 

FTAB - Build unprotected input field table 



CALL SETPAN 



CALL SETPAN, (dsname) , (return code) 



This routine causes the specified screen format to be read into 
the Input Buffer (replacing the last operator input) and sets a 
switch to cause the screen format to be written t o the screen 
during the next output cycle. Any nulls (X'00 f ) in the screen 
image will be written unprotected. All other characters will be 



V 
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next display after SETPAN will be set, at the first unprotected 
character position. Before executing a CALL SETPAN* be sure to 
save desired information which is in the buffers, as they will 
be overlaid by the screen definition. 

SETPAN parameters: 

dsname The data set name of the desired screen format in 

«inPN«; vnliimp. 



return code 



the SCRNS volume 



A word to receive the return code. The following is 
a list of the possible return codes: 
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- 1 = Successful) new screen in buffer. 

-500 = This terminal is not an IBM <♦ 978/4979/310 1 
No action has been taken. 

-501 = Screen data set not found. 

1 = Warning* data set does not contain a 

valid $IMAGE screen. Input Buffer has 
been set to unprotected nulls (X'OO 1 ) 
and cursor position set to (0*0). 

2 = Warning* too many unprotected default 

characters in the screen definition. 
The number of default characters that 
will be displayed has been truncated. 

This return code is received if there 
are no default unprotected characters 
in the screen. The $ IMAGE utility 
initially assigns 1920 unprotected 
characters to a screen. This number is 
unchanged if the data (unprotected) 
was not modified using the edit mode 
of the SIMAGE utility. 
Use PF2 with $IMAGE to enter default 
data . 

Other = Return code from disk READ. 
See the Language Reference . 



CALL CHGPAN 



CALL CHGPAN 



Afte 

spec 

data 

outp 

you 

that 

tect 

of u 

firs 

SETP 

de ve 



r a CALL S E T P A N » the protected characters of the screen 
ified have been placed in the Input Buffer. You can add 

to the image by changing the Input Buffer prior to the next 
ut cycle* and the data is displayed as protected data. If 
do this* you must also CALL CHGPAN to inform the manager 

it needs to recompute the location of the first unpro- 
ed character position in the current screen and the count 
nprotected characters. The cursor position is set to the 
t unprotected character position. CHGPAN also sets the 
AN indicator thus allowing applications to dynamically 
lop protected screens. 
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Dynamic Screen Modification and Creation*. By direct manipu- 
lation of the Input and Output Buffers it is possible to modify 
screens built by $IMAGE and retrieved by SETPAN. It is also 
possible to create screen images dynamically. 

The Input Buffer contains a 24 X 80 (1920) byte image of the 
screen wherein unprotected fields are represented by null (ze- 
ro) fields. The other bytes will be displayed as protected 
characters. Additional protected characters may be added to 
the screen image simply by inserting them in the appropriate 
positions in the Input Buffer. Additional unprotected fields 
can be added to the screen image by inserting nulls appropri- 
ately. Both protected and unprotected fields can be modified, 
deleted, extended, or contracted by the correct insertion of 
characters in the desired portions of the Input Buffer. If this 
is performed, it is necessary to call CHGPAN in order to indi- 
cate screen image modification. 

It is also possible to modify the contents of the Output Buff- 
er. For example, after a call to SETPAN, the Output Buffer may 
be modified to allow the program to modify or supply default 
data. Furthermore, if the Input Buffer is filled with null 
characters, the contents of the Output Buffer will be displayed 
"as is". CHGPAN must be called whenever the Input Buffer is 
mod i f i ed . 

To create a new screen, fill up the Input Buffer as desired with 
protected and unprotected characters, blanks, and null fields. 
Place default data in the Output Buffer, and call CHGPAN. 



\y 
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CALL SETCUR 



CALL SETCUR , (row) , (column) 



CALL SETCUR specifies (overrides) the position at which the 
cursor is to be displayed for the next output cycle. 

SETCUR parameters: 

row One-word value representing the row position* 0-23. 

column One-word value representing the column position, 
0-79. 

The cursor position for each screen displayed on a terminal is 
set to first unprotected character position by default. This 
function permits you to override the cursor position for the 
output on ly . 



CALL BEEP 



f\ 



CALL BEEP 



CALL BEEP causes the audible alarm (if available) to be sounded 
following the next output cycle. 

The IBM 4979 terminal has no audible alarm and ignores this 
request . 

When executed for an ASCII terminal, this request causes the 
next output line to be followed by a bell character. 



CALL MENU 



CALL MENU 



o 



CALL MENU immediately aborts the current dialog and causes the 
terminal's menu screen (or request for program name message) to 
be d i sp layed . 
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The operator can cause this at any time by pressing PF3 at an 
IBM 4978/4979/3101 or by typing OUT on an ASCII terminal while 
i n a d i alog . 






I CALL FTAB 



CALL FTAB, (table), (size), (return code) 



FTAB sets up a table which describes the unprotected (input) 
fields placed in the Input Buffer after a SETPAN or a CHGPAN has 
been executed. The table is a sequence of 3-word entries which 
describe unprotected (input) fields. This is useful for such 
functions as setting the cursor. 

Note : The FTAB function must be included in the application 
link for it to be available. See the section on "Program 
Preparation" on page 164 for information. 

FTAB parameters: 

table 



A sequence o 
unprotected 



f 3-word entries which describe the 
fields of the screen image in the 
Input Buffer. Each entry contains the starting row 
and column positions, and the length (in bytes) of 
a field. Unused entries in a table will be set to 
zero. The format is as follows: 



table 



table+6 



table+12 



row 

col umn 

length 

row 

column 

length 

row 

column 

length 



(first field) 



(second field) 



(third field) 



V, y 



s i ze 



A word which gives the number of 3-word entries in 
the table. 



return code A word for the return of a status code. The return 
codes are as follows: 



-2 

-1 

1 

2 



FTAB code not linked with application 
successful return 
no data fields found 
warning, table truncated 



o 
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I CALL FAN 



CALL FAN 



| FAN performs no operation ("no-op") 



Accessing the Terminal Environment Block 



Although the terminal environment block (TEB) can be accessed 
directly (since its address is a user program parameter), the 
user program may find it more convenient with the following 
function to determine the attributes of the calling terminal. 



CALL CDATA 



o 



CALL CDATA, (type) , (userid) , (userclass) , (termname) , (buffersi ze) 



This subroutine returns data concerning the terminal currently 
executing the program. 



CDATA parameters: 



type 



A word specifying the terminal type: 



= Terminal is an IBM 4978, 4979, or 3101 
2 = Terminal is an ASR 33/35 or equivalent 



user i d 



The 4-byte value set by the SIGNON program when the 
current terminal signed on. If the current termi- 
nal does not use SIGNON, this value is meaning- 
less . 



userclass The 4-byte value set by the SIGNON program when the 
current terminal signed on. If the current termi- 
nal does not use SIGNON, this value is meaning- 
less. 



termname The 8-byte (right padded with blanks, 
necessary) name of the current terminal. 



if 



buffersize The length of the terminal's I/O buffer. For IBM 
4978/4979/3101 terminals, this is the number of 
unprotected characters in the last screen which 
was set using SETPAN. 
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Disk File Support 



All requests for disk /diskette I/O are by means of a call to the 
FILEIO routine. FILEIO provides the following functions: 



c 



> 
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• Automatic open of the requested data set. 

• Direct access support for non-Indexed Access Method files* 
where records are accessed by a relative record number 
(RRN) . 

• Support for Indexed Access Method files* providing a 
high-level language interface to most Indexed Access Meth- 
od ser v i ces . 

• Data integrity* via automatic close at terminal manager 
shutdown and automatic write back of data buffers. 

If Indexed Access Method files are used, the Event Driven Exec- 
utive / Indexed Access Method (5719-AM3) is required. 

Automatic OPEN/CLOSE: FILEIO automatically controls the 
opened/closed status of a data set. Thus data set names must 
not be coded on the PROGRAM statement of Multiple Terminal Man- 
ager programs. If the data set is not open when a request is 
made* the data set is opened. Since many terminals can require 
many data sets, both the same and different, the user can find 
that there was no storage available to open a requested data I 

set. In order to avoid this situation* a limit is set for the 
number of open data sets. In the Multiple Terminal Manager 
default system, space is allocated for 14 open data sets. When 
this limit is reached, the least recently accessed data set is 
closed, and the space it required is reused. A data set is not 
available for automatic close if it has an update pending. The 
user can adjust the maximum number of open data sets by chang- 
ing the file table in the Multiple Terminal Manager source 
module CDMCOMMN. 

Indexed File Support: FILEIO provides an interface to the Event 
Driven Executive Indexed Access Method. 

Programs written in high-level languages can access indexed 
files by calling the FILEIO routine. The functions supported 
are listed under the heading "Indexed File Request Types" in 
this section. An Indexed Access Method file must be created. 
For information on how to create an Indexed Access Method file, 
see the System Guide . 



j? 
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Some features of the indexed file support include the follow- 

i ng : 

• Records can be retrieved sequentially or by key. 

• The key can be a generic key, that is, the first n bytes of 
the actual key . 

• Records can be added or deleted by key. 

• It takes the same length of time to retrieve added records 
as original records. 

If an application requires access to a file sequentially, and 
also directly by alphameric keys, indexed files are required. 

Since Indexed Access Method files are owned by a supervisor 
task* using the $C command to cancel the terminal manager does 
not close these files. For data integrity* use the 
DISCONNECT , ALL command described in the section "Operator 
Interface" on page 158, 

Additional information on indexed files and indexed file 
request types is discussed in the System Guide under "Indexed 
Access Method" . 



o 



CALL FILEIO 



FILEIO provides the facility to access previously created 
files via the call interface described earlier. These files 
must have been previously defined and loaded. 



CALL FILEIO, (fca) , (buffer) , (return code) 



FILEIO parameters: 



fca 



The file control area. The address of a table with 
the parameters describing the requested oper- 
ations: 
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Request Type 



4 Data Set Name 



A 4-byte EBCDIC request, 
for example: CL4 f READ f 

An 8-byte EBCDIC data set name 



> 



12 Key Relation 
Operator 



or 
Number of 
Records 



14 Key Length 



16 Key Location 



or 
EOD Record 
Number 



A 2-byte EBCDIC key relation 
operator, the characters 
"GT" , "GE", "EQ" 
(indexed files only) 

A word value for the number 
of 256-byte records to be 
read or written by this 
call (direct files only) 

A word specifying the length of 
the key to be used for retrieval 
If the length specified is less 
than the actual key length, the 
first n bytes of the key are 
used (indexed files only). 

The address of the key 
(FORTRAN, EDL, and PL/I) to be 
used (indexed files only). 
For COBOL, the value must be 0. 

The system maintained logical 
EOD record number passed back 
to the application after each 
direct file READ or WRITE 
(direct files only). 



c 



18 Reserved 



20 Relative 
Record 
Number 



22 Volume Name 



28 Key Field 



A word value for the 
RRN. The first record is 
record number 1 (direct files 
only ) . 

A 6-byte EBCDIC volume name 

The key to be used 

(COBOL indexed files only), 

if Key Length non-zero. 



buffer 



The address of the user program I/O buffer. This is 
in the user program space. FILEIO and Indexed 
Access Method have their own buffers. 



return code 



The address of the 2-byte field to contain the 
return code passed back by FILEIO. This can be a 
FILEIO return code, an Event Driven Executive sys- 
tem error code or an Indexed Access Method code. 
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File Control Area (FCA): The entire FCA must be mapped for 
Event Driven Language, FORTRAN, PL/I, and COBOL except as 
noted . 






12 
14 
16 
18 
20 
22 

28 



REQUEST TYPE 



DATA SET NAME 



KEY REL OP OR NUMBER OF RECORDS 



KEY LENGTH 



KEY LOCATION OR EOD RECORD NUMBER 



RESERVED 



RELATIVE RECORD NUMBER 



VOLUME NAME 



KEY FIELD (COBOL index files only) 
(size defined in KEY LENGTH field) 
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Indexed File Request Types: The indexed file request types and 
functions are defined as follows: 

RELS Release from sequential processing mode 

RELR Release a record held for update 

PUTU Put operation, update mode 

PUTD Put operation* delete mode 

PUTN Put operation, new mode adds a record to the file 

GETD Get operation, direct read 

GETS Get operation, sequential read 

IDEL Delete operation 

ICLS Close an indexed data set 

GTDUVGTRU Direct get, update mode 

GTSU Sequential get, update mode 

Note : GTDU and GTRU are identical in the operation they 
perform . 

Direct File Request Types: The direct file request types and 
functions are defined as follows: 



i_y 



V_.y 



READ 



WRIT 



SEOD 



Read the record defined by the RRN field of the FCA 
into the user-provided buffer 

Write the record defined by the RRN field of the FCA 
into the major user-provided buffer 

Set the system maintained EOD pointer to the record 
number provided in the relative record number field 
of the FCA 
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FILEIO Return Codes 



o 



Return 
Code 
-1 

201 

202 

203 

204 
205 
206 



207 
208 



Descr i pt i on 

Successf u 1 

Data set not found 

Volume not found 

No file table entries are available; all have 

updates outstanding 

I/O error reading volume directory 

I/O error writing volume directory 

Invalid function request type 

(this is returned for a valid Indexed Access 

Method function if the Indexed Access Method 

link module is not linked with the Multiple 

Terminal Manager) 

Invalid key operator 

SEOD record number greater than data set length 



o 



Other return codes not shown above are returned by the Indexed 
Access Method or by the Event Driven Executive data management 
support . 
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Event Driven Executive Direct File I/O Considerations 



The Multiple Terminal Manager FILEIO interface to Event Driven 
Executive direct file support allows the user to access records 
by specifying relative record numbers (RRNs). Normally, a 
direct file may be viewed as a sequence of records starting 
with RRN=1 and continuing until the end of data record number, 
that is, RRN=EOD. The end of data record number is returned in 
the file control area (FCA) after each READ or WRIT (write) 
request. It may be set by a "set end of data" (SEOD) request. 



No e 

Exec 

reco 

poss 

cann 

appl 

i nap 

swap 

i s , 

reco 

appl 



ffort is made to ensure the data integrity of Event Driven 
utive direct files involving concurrent access to the same 
rd. That is, no record locking is performed. However, it is 
ible to ensure that Multiple Terminal Manager applications 
ot access the same record concurrently by ensuring that 
ication is not swapped out of the application area at an 
propriate moment. (An application is only vulnerable to 
out during an ACTION, LINK, LINKON, WRITE, or CYCLE). That 
an application can read, modify, and write a particular 
rd and be assured that another Multiple Terminal Manager 
ication will not alter the record at the same time. 



This technique only applies to applications competing for 
concurrent access under a single copy of Multiple Terminal Man- 
ager. Other disciplines must be used if other applications are 
i nvol ved . 

If a user desires sequential access to a direct file, it is the 
user's responsibility for incrementing the RRN field and 
ensuring it does not exceed the end of data record number. One 
technique involves reading the file to get the end of data 
record number, and then entering a loop, as in the example on 
the following page where a file "A,EDX002" is processed. 
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* GET EOD (RETURNED BY READ OPERATION) 

MOVE RRN,1 

CALL FILEIO, (FCA), (BUFFER) , (RC) 

* PROCESS FILE FROM RRN=1 TO EOD 

MOVE RRN,0 

DO EOD, TIMES 

ADD RRN,1 

CALL FILEIO, (FCA) , (BUFFER) , (RC) 



ENDDO 



* FILE i 


CONTROL 


AREA 


FCA 


EQU 


x 




REQTYPE 


DATA 




CL4 ? READ T 


DSNAME 


DATA 




CL8 ? A* 


NUMREC 


DATA 




F T 1' 




DATA 




F'O' 


EOD 


DATA 




F f f 




DATA 




F'0 f 


RRN 


DATA 




F T 0' 


VOLNAME 


DATA 




CL6 f EDX002 



o 
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FILEIO Indexed Access Method Considerations 



FILEIO uses the parameters provided to create a parameter list 
for an Indexed Access Method supervisor call. Therefore, it is 
important to understand Indexed Access Method operation, as 
explained in the section "Indexed Access Method" of the System 
Guide . 




GET 






SAVE RECORD 
CONTENTS 






DISPLAY TO 
OPERATOR 






GET WITH UPDATE 






ENSURE RECORD 
CONTENTS ARE 
UNCHANGED 






PUT NITH UPDATE 






DISPLAY TO OPERATOR 



k.. 
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If sequential processing has been initiated on any indexed 
files, the FILEIO cleanup routine also releases those files 
from sequential processing mode. Thus, in order to continue 
sequential processing from the same key, applications should 
save the last key before issuing an ACTION, LINK, LINKON, WRITE 
or CYCLE. 

An indexed file may be scanned from beginning to end by use of a 
sequence of "get sequential" (GETS) operations. The first GETS 
in a sequence thereof should specify a key of all nulls ( X * ' ) 
and a key relational operator of greater than ( C ' G T ' ) . When 
executed, this initial GETS operation will receive the first 
record in the file (following the record, if any, for which the 
key is all nulls.) Subsequent GETS will retrieve the records 
following the first, in sequence. 

After a DISCONNECT , AL L command is issued, FILEIO executes a 
termination routine before the Multiple Terminal Manager ter- 
minates. This termination routine closes all remaining open 
Indexed Access Method files. This causes any control informa- 
tion and records remaining in the Indexed Access Method 
internal storage buffers to be written to disk. 

Following is a mapping of Multiple Terminal Manager/Indexed 
Access Method request types to the actual Indexed Access Method 
f unc t ion. 



MULTIPLE TERMINAL 
MANAGER REQUEST 

RELS 

RELR 

PUTU 

PUTD 

PUTN 

GETD 

GETS 

IDEL 

ICLS 

GTDU/GTRU 

GTSU 



INDEXED ACCESS 
METHOD FUNCTION 

ENDSEQ 

RELEASE 

PUTUP 

PUTDE 

PUT 

GET 

GETSEQ 

DELETE 

DISCONN 

GET/UPEQ,UPGT,UPGE 

GETSEQ 



Note •* The Indexed Access Method is accessed by the Multiple 
Terminal Manager and, therefore, the application programs that 
run under the Multiple Terminal Manager will not need to 
include the Indexed Access Method equates and, must not be 
LINKed with Indexed Access Method link module. 



Chapter 5. Multiple Terminal Manager 



149 



Programming Considerations 



Multiple Terminal Manager applications are processed as ini- 
tial tasks of a program which execute within the program manag- 
er's overlay area. On the first execution of a program during a 
transaction, the program is brought into the overlay area via a 
LOAD instruction. Then, when the program returns control to the 
Multiple Terminal Manager via a CALL ACTION, WRITE, CYCLE, 
MENU, LINK or LINKON, the Multiple Terminal Manager dequeues 
the program from Event Driven Executive via a DETACH 
instruction. Also, if the program returned via a CALL ACTION, 
WRITE or CYCLE, the Multiple Terminal Manager writes the pro- 
gram out to the MTMSTORE data set. The overlay area is then free 
for use by other programs. When the Multiple Terminal Manager 
is ready to re-execute that program for subsequent processing 
of the transaction, the program manager reads the program into 
the overlay area and requeues that program to Event Driven 
Executive via an ATTACH instruction. 

Thus, Multiple Terminal Manager application programs should 
adhere to the following conventions: 

• No subtasks should be active across calls to the Multiple 
Terminal Manager. 

• No system-wide resources should be enqueued across calls 
to the Multiple Terminal Manager. 

• Application programs cannot use overlays. 

• Application programs must be written as subroutines named 
MTMSUB and designed to receive four parameters at initi- 
ation. 

• Application programs should utilize the Multiple Terminal 
Manager for all terminal and disk I/O. 

• All other I/O should be complete prior to any call to the 
Multiple Terminal Manager. 

• Application programs should terminate only via calls to 
the Multiple Terminal Manager and should not issue any 
PROGSTOP, ENDTASK, or DETACH instructions. 

• Error exit routines should terminate via a CALL MENU. 

• Changes affecting the SCRNS or PRGRMS volumes during the 
Multiple Terminal Manager session will not be effective 
until the Multiple Terminal Manager is terminated and 
re loaded . 



\ y 
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Event Driven Language Programming Considerations 

An Event Driven Language application* which must be written as 
a subroutine* must be defined to accept four parameters. In 
addition, the Multiple Terminal Manager functions must be 
identified via the EXTRN statement. The subroutine name MTMSUB 
must also appear on the ENTRY statement. For example: 

ENTRY MTMSUB 

EXTRN ACTION,BEEP,CYCLE,SETCUR,CHGPAN,CDATA,MENU 

EXTRN SETPAN, FILE 10* LINK, L INKON , NR ITE , FTAB , FAN 

SUBROUT MTMSUB, INPUT, OUTPUT, TEB, I IB 

The interface used by the Multiple Terminal Manager stub 
CDMEMAIN for calling the Event Driven Language subroutine is 
via the CALL instruction. 

For example, the statement to call SETPAN is: 

CALL SETPAN, (MENUNAME) , (RC) 

This statement would result in the addresses of MENUNAME and RC 
being passed to the Multiple Terminal Manager. 






The syntax for calling Multiple Terminal Manager functions in 
the Event Driven Language is: 



CALL ACTION 

CALL ACTION, (BUFFER) , (LENGTH) , (CRLF) 

CALL LINK, (PROGRAM) 

CALL LINKON, (PROGRAM) 

CALL CYCLE 

CALL WRITE, (BUFFER), (LENGTH) , (CRLF) 

CALL SETPAN, (DSNAME) , (RC) 

CALL CHGPAN 

CALL SETCUR, (ROW) , (COLUMN) 

CALL BEEP 

CALL MENU 

CALL CD AT A, (TERMTYPE) , (USER ID) , ( USE RC LASS) 

CALL FILEIO, (FCA) , (BUFFER) , (RC) 

CALL FTAB, (TABLE) , (SIZE) , (RC) 

CALL FAN 



(TERMNAME), (BUFSIZ) 
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FORTRAN Programming Considerations 



A FORTRAN application, which must be written as a subroutine, 
must be defined to accept four parameters, for example: 

SUBROUTINE MTMSUB ( INPUT , OUTPUT , TEB , I IB ) 

The interface used by the Multiple Terminal Manager stub 
CDMFMAIN for calling the FORTRAN subroutine is via the Event 
Driven Language CALLFORT instruction. For interfacing to the 
Multiple Terminal Manager, FORTRAN applications utilize the 
FORTRAN CALL statement for calling Event Driven Executive sub- 
rout i nes . 

For example, the statement to call SETPAN is: 

CALL EDX(SETPAN,2,IADDR(MENUNAME) ,IADDR(RO) 

This statement would result in the addresses of MENUNAME and RC 
being passed to the Multiple Terminal Manager. 

All Multiple Terminal Manager functions which the application 
calls must be declared as EXTERNAL, for example: 

EXTERNAL SETPAN , ACTION , MENU , F I LEI 

The syntax for calling Multiple Terminal Manager functions in 
FORTRAN is: 

CALL EDX(ACTION,0) 

CALL EDX(ACTI0N,3, I ADDR ( BUFFER ) , I ADDR ( LENGTH ) ,IADDR(CRLF) ) 

CALL EDX(LINK,1 , I ADDR ( PROGRAM-NAME ) ) 

CALL EDX(LINKON, 1 , I ADDR ( PROGRAM-NAME ) ) 

CALL EDX(CYCLE,0) 

CALL EDX(WRITE,3, I ADDR ( BUFFER ) , I ADDR ( (LENGTH) ,IADDR(CRLF) ) 

CALL EDX(SETPAN,2,IADDR(DSNAME) , I ADDR ( RET-CODE ) ) 

CALL EDX(CHGPAN,0) 

CALL EDX(SETCUR,2,IADDR(R0W),IADDR(C0LUMN)) 

CALL EDX(BEEP,0) 

CALL EDX(MENU,0) 

CALL EDX( CD AT A, 5, I ADDR (TERM-TYPE), I ADDR (USER ID) , 

I ADDR (USER -CLASS) , I ADDR ( TERM-NAME ) , I ADDR ( BUF-SIZE ) ) 
CALL EDX(FILEI0,3, I ADDR ( F I LE-CONTROL-ARE A ) , I ADDR ( BUFFER ) , 

IADDR(RET-CODE) ) 
CALL EDX(FTAB,3,IADDR(TABLE),IADDR(SIZE) , IADDR(RO) 
CALL EDX(FAN,0) 



V. 
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COBOL Programming Considerations 



The PROGRAM-ID for all Multiple Terminal Manager COBOL appli- 
cations must be "MTMSUB". In addition, all parameters passed to 
the Multiple Terminal Manager must be level 01 or 77. The four 
parameters passed to the application, Input Buffer, Output 
Buffer, TEB, and IIB must be defined in the program's LINKAGE 
SECTION. Refer to "COBOL Sample Progl" on page 193 for an exam- 
ple. The PROCEDURE DIVISION must contain the USING clause 
followed by the names given to the Input Buffer, Output Buffer, 
TEB, and IIB, in that order. 



For CALL FILEIO, if key location equals and key length not 
equal to 0, the file manager assumes that the key is immediate- 
ly following the FCA. This is primarily to facilitate COBOL 
programs, which cannot code addresses. 

The following example shows an FCA for indexed files which 
would read a record associated with a ^-character key"XXXX". 



jm%^ 



01 FILE-CONTROL-AREA. 

05 REQUEST-TYPE PIC X(4) VALUE "GETD" 



05 DATA-SET-NAME PIC X(8) 

05 KEY-REL-OP PIC XX 

05 KEY-LENGTH PIC S999 

05 KEY-LOCATION PIC S999 

05 FILLER PIC X(4) 

05 VOLUME-NAME PIC X(6) 

05 KEY PIC X(4) 



VALUE "EQ". 
COMP VALUE 4 
COMP VALUE 



VALUE "XXXX" 



For interfacing to the Multiple Terminal Manager, COBOL appli- 
cations utilize the COBOL CALL statement for calling subrou- 
tines. 

For example the statement to call SETPAN is: 

CALL "SETPAN" USING SCREEN, RC. 

This would result in the addresses of SCREEN and RC being 
passed to Multiple Terminal Manager. 

The WORKING-STORAGE SECTION would have the following: 

77 SCREEN PICTURE X(8) VALUE "SCRNNAME". 
77 RC PICTURE 99 COMP. 
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The syntax 
COBOL is: 



for calling Multiple Terminal Manager functions in 



CALL 
CALL 
CALL 
CALL 
CALL 
CALL 
CALL 
CALL 
CALL 
CALL 
CALL 
CALL 

CALL 
CALL 
CALL 



'ACTION". 

'ACTION" USING BUFFER, LENGTH, 

'LINK" USING PROGRAM-NAME. 

LINKON" USING PROGRAM-NAME. 
'CYCLE". 

'WRITE" USING BUFFER, LENGTH, 
'SETPAN" USING DATA-SET-NAME, 

CHGPAN". 

'SETCUR" USING ROW, COLUMN. 
'BEEP". 

MENU". 
'CDATA" USING TERMINAL-TYPE, 

TERMINAL-NAME, BUFFER-SIZE. 
'FILEIO" USING FILE-CONTROL-AREA, 



CRLF 



CRLF. 
RETURN- 



CODE 



USER-ID, USER-CLASS, 



BUFFER, RETURN-CODE 



'FTAB" 
FAN". 



USING TABLE, SIZE, RETURN-CODE 



^ 
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I PL/I Programming Considerations 
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A PL/I application must be named MTMSUB, and defined to accept 
four parameters: 

MTMSUB: PROCEDURE ( INPUT_BUFFER , 

OUTPUT_BUFFER, 
TEB, 
PF_KEY) ; 

INPUT_BUFFER, OUTPUT_BUFFER , and TEB should usually be 
declared as structures. PF_KEY should be declared BINARY FIXED 
(15) . 

All Multiple Terminal Manager functions which the application 
calls must be declared as ENTRY* for example* 

DECLARE 

(SETPAN, ACTION, MENU, SETCUR, BEEP, FILEIO) 
ENTRY; 

The syntax for calling Multiple Terminal Manager functions in 
PL/I is: 

CALL ACTION; 

CALL ACTIONCBUFFER, LENGTH, CRLF); 

CALL LINK(PROGRAM_NAME) ; 

CALL LINKON(PROGRAM_NAME) ; 

CALL CYCLE; 

CALL WRITECBUFFER, LENGTH, CRLF); 

CALL SETPAN(DATA_SET_NAME, RETURN_CODE ) ; 

CALL CHGPAN; 

CALL SETCURCROW, COLUMN); 

CALL beep; 

CALL MENU; 

CALL CDATA(TERMINAL_TYPE, USER_ID, USER_CLASS, 

TERMINAL_NAME, BUF F ER_SI ZE ) ; 
CALL FILEIO(FILE_CONTROL_AREA, BUFFER, RETURN_CODE ) ; 
CALL FTABCTABLE, SIZE, RETURN_CODE ) ; 
CALL FAN; 

For WRITE, the buffer variable must be a character string. For 
FTAB, the table variable must be an array. All variables should 
be declared as STATIC whenever possible. 



o 
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SIGNON/SIGNOFF Programs 



SIGNON 



A sample SIGNON program is distributed with the Multiple Termi- 
nal Manager. If the terminal requires sign-on* the IBM supplied 
SIGNON program displays the SIGNON screen and does a CALL 
ACTION to obtain the user ID and password. 

The user must enter the sign-on ID (8 bytes alphanumeric) and a 
password ( 4 bytes alphanumeric). This data will be passed to 
the SIGNON program in the Input Buffer as it would be to any 
other program. The sign-on ID and password are validated 
against the SIGNON file. If valid, the sign-on is complete and 
the primary menu is displayed. If invalid, a bad return code is 
set (=1) and the SIGNON program is reloaded by Multiple Termi- 
nal Manager. The two sign-on ID records in the distributed 
SIGNON f i le are: 



SI GNON ID 

11111111 

22222222 



PASSWORD 

1111 

2222 



You can add additional records with the Event Driven Executive 
text editor. 

In addition to the four parameters passed to all applications, 
the SIGNON routine receives a fifth parameter which is the 
address of the sign-on control area. The contents of the 
sign-on control area are as follows: 



\ 



_v 



RC - 2-byte return code indicating 
action to be taken. 



to the system the 



• USERID - Four bytes handled exactly like USERCLASS. 

• USERCLASS - Four bytes set by user sign-on program which 
will be saved and passed as a parameter to the sign-off 
program when the current user signs off. These four bytes 
are contained in the TEB and are also available to any 
standard program to validate the user if desired. 

= valid sign-on, display the terminal's menu screen. 

1 = invalid sign-on, redisplay the sign-on screen. 

USERCLASS and USERID sre not used by the Multiple Terminal Man- 
ager. They are saved in the TEB and reported via CALL CDATA to 
requesting programs from this terminal while the current 
sign-on is active. 
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SIGNOFF 



A sign-off program is not provided with the default system; 
however* provisions are made within the Multiple Terminal Man- 
ager to invoke a sign-off program. If you write a sign-off pro- 
gram, it will be passed the same parameters as the sign-on 
program . 



o 



If these programs exist, they must meet the following consider- 
ations ' 

• SIGNON and SIGNOFF are optional. Either SIGNON alone or 
SIGNON and SIGNOFF can be in the system. If they are in the 
system, the names must be SIGNON and SIGNOFF. If they are 
not in the system, the names SIGNON and SIGNOFF must not be 
used for other user-written programs. 

• The SIGNOFF program is invoked when the PF3 key is entered 
from the menu screen. 

• SIGNON/SIGNOFF cannot be executed from the menu screen by 
entering the program name. 

• Individual terminals can be generated to require or not 
require sign-on. If the user does not include a SIGNON pro- 
gram, any terminals marked requiring sign-on are unusable 
since there is no way to validate sign-on attempts. 

• SIGNON/SIGNOFF can use CALL CDATA to obtain the terminal 
name and other terminal information. 




The use of USERCLASS and USERID is optional. 

LINK and LINKON can not be used. 

PF3 entered by the operator during SIGNON, will cause the 
current SIGNON session to be terminated and a new SIGNON 
session to be started. 
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OPERATOR INTERFACE 



Multiple Terminal Manager Initiation and Termination 



The Multiple Terminal Manager can be initiated from any termi- 
nal defined to the Event Driven Executive system by entering 
the $L $MTM,PRGRMS command. This command starts the Multiple 
Terminal Manager program manager. The program manager then 
initiates a terminal server for each terminal specified in the 
TERMINAL file. Upon completion of initiation* the IPL screen, 
IPLSCRN, is displayed at each of the Multiple Terminal Manager 
terminals. IPLSCRN specifies that the operator press the ENTER 
key in order to display either the sign-on or menu screen. 

The Multiple Terminal Manager is terminated by disconnecting 
all terminals using the DISCONNECT command. The $C command 
should not be used to terminate Multiple Terminal Manager 
tasks . 



Signing On 



If sign-on is specified for the terminal, then the sign-on 
screen, SIGNON, is displayed following the IPL screen. The 
sign-on screen requires that the operator enter a sign-on and 
password. After sign-on processing is completed, the menu 
screen is displayed. 



Program Initiation and Termination 

After Multiple Terminal Manager initiation and sign-on proc- 
essing are completed, the menu screen is displayed. The menu 
screen is the screen from which the operator can initiate 
transactions. A transaction is initiated by the operator 
entering either a program name or pressing a PF key when the 
menu screen is displayed. A PF key initiates program PFnn, 
where nn reflects the number of the PF key pressed. If data is 
entered, the Multiple Terminal Manager considers the first 
eight bytes to be a program name. 

After a transaction is initiated, the operator can terminate it 
by pressing the PF3 key. Upon termination of the transaction, 
the menu screen is redisplayed. A subsequent pressing of the 
PF3 key from the menu screen causes the sign-on screen to be 
redisplayed if sign-on is specified for that terminal. Other- 
wise, PF3 will be a "no-op" and the menu screen remains dis- 
p layed . 
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Utilities 



Disconnect: Terminals can be disconnected from the Multiple 
Terminal Manager or the Multiple Terminal Manager can be termi- 
nated via the DISCONNECT facility. DISCONNECT is invoked from 
the menu screen by keying in either DISCONNECT, DISCONNECT *, 
DISCONNECT, termname, or DISCONNECT , AL L . If DISCONNECT or DIS- 
CONNECT * is entered, the terminal upon which that request was 
entered is disconnected. If a referenced terminal is in a 
transaction, that transaction is allowed to complete. When the 
terminal returns to MENU state, it is automatically signed off 
and immediately displays the YOU ARE DISCONNECTED message. 

If DISCONNECT , ALL is specified, all terminals are discon- 
nected. When the last terminal is truly disconnected, whether 
via DISCONNECT, ALL or separate DISCONNECTS, the manager task 
is stopped. This is the only method that should be used to ter- 
minate the Multiple Terminal Manager. 

Note that to enter this command from a screen, the terminal's 
menu screen must contain at least 19 unprotected characters. 

While a terminal continues in a transaction with disconnect 
pending, the audible alarm is sounded after every interaction 
to tell the operator that a disconnect is pending. 

Reconnect: If the referenced terminal is disconnected, it is 
reconnected using RECONNECT , ALL or RECONNECT , termname in a 
signed -off status (if applicable). If the terminal is not dis- 
connected, the command is ignored. The reconnect should be 
issued from a terminal other than the disconnected terminal. 
The program name of this command is RECONNEC. 

Programs Report: This report displays data about each avail- 
able program. It is intended mainly for debugging during devel- 
opment of the manager but is included as a working example for 
poss i ble use . 

The name of this program is PGMRPT. 

The Programs Report will have the following headings: 

PGM NAME LENGTH (in records) 

Terminal Activity Report: This program displays the names and 
status of all terminals on the system. If more than 19 termi- 
nals are attached, the operator must press ENTER to page to 
successive groups of 19 lines. 



The name of this program is REPORT. 
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The Terminal Activity Report has the following headings: 

TERMINAL TERMINAL USER USER PROGRAM OPERATOR TERMINAL 
NAME TYPE ID CLASS INPUTS OUTPUTS 

Screens Report: This program displays the names of the screens 
defined in the SCRNS volume. The operator can key in the screen 
name to be displayed. 

The name of this program is SCRNSRPT. 

Screen Print: Displayed screens on a 4978 or 4979 terminal can 
be printed on the system printer by pressing the PF6 key or the 
key specified on the HDCOPY parameter of the TERMINAL statement 
during system generation. 



^ 
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DISTRIBUTION, INSTALLATION AND PROGRAM PREPARATION 



The Multiple Terminal Manager is distributed as a program pro- 
duct and each distribution consists of the following items: 



Prebuilt Multiple Terminal Manager - This is a prebuilt 
Multiple Terminal Manager consisting of a program manager, 
file manager, terminal servers and utility programs. The 
Indexed Access Method interface is not included. 

Multiple Terminal Manager source for module CDMCOMMN - 
This is the Multiple Terminal Manager source code for the 
user who wants to tailor the Multiple Terminal Manager 
en v i ronment . 

Screen formats - This is a set of screens to support the 
default Multiple Terminal Manager and sample programs. 



TERMINAL File - This is a set of miscellaneous 
statements to support the default system. 



terminal 



CDMEMAIN, CDMFMAIN, CDMCMAIN, and CDMPMAIN - These are the 
Multiple Terminal Manager application stubs in object for- 
mat that must be included with either Event Driven Lan- 
guage, FORTRAN, COBOL, or PL/I programs at link time. 
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Installation 



The user must have created the following volumes on the system 
disk at system generation time. 

PRGRMS This volume is for the Multiple Terminal Manager 
programs, user application programs, terminal spec- 
ifications file and SIGNONFL file. 

SCRNS This volume is for the screen formats used by 
Multiple Terminal Manager and user applications. 

MTMSTR This volume is for the MTMSTORE data set used by the 
Multiple Terminal Manager. 

After the volumes have been created, the user can then copy the 
prebuilt Multiple Terminal Manager, screen formats and termi- 
nal file from the source diskettes to disk. This installs the 
default Multiple Terminal Manager and establishes the follow- 
ing data sets. 

Data sets within the PRGRMS volume: 

$MTM The Multiple Terminal Manager program manager 

CDMSVR89 The Multiple Terminal Manager full screen, 4978 and 
4979, terminal server 

CDMSVR33 The Multiple Terminal Manager TTY terminal server 

CDMSVR01 3101 Model 2 terminal server 

CDMINIT The Multiple Terminal Manager initialization 
rout i ne 

TERMINAL The Multiple Terminal Manager terminal 
specification file 

In addition, the PRGRMS volume contains miscellaneous data 
sets needed for the utility programs. 

Data sets within the SCRNS volume: 

IPLSCRN The initial Multiple Terminal Manager displayed 
screen 

SIGNONSC The sign-on screen 

MENUSCRN The default menu screen 

SCRNSREP The SCRNSRPT selection menu 






\ 
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The Multiple Terminal Manager can be tailored by reassembling, 
rebuilding and replacing the changed Multiple Terminal Manager 
components . 

The terminal specifications file (TERMINAL) can be modified to 
match your system environment by using the $FSEDIT Event Driven 
Executive utility. Screen formats can be added to the SCRNS 
volume via the $IMAGE Event Driven Executive utility. 

Before executing the Multiple Terminal Manager, the user has to 
create the MTMSTORE dataset. 
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Program Preparation 



Event Driven Language Program Preparation 



The Multiple Terminal Manager contains a main routine* 
CDMEMAIN, for supporting Event Driven Language applications. 
CDMEMAIN is the Multiple Terminal Manager stub for Event Driven 
Language applications; and is object code which enables the 
Multiple Terminal Manager to invoke and pass parameters to the 
application program. 

It is necessary to link CDMEMAIN with the application object 
module so that the application can communicate with the Multi- 
ple Terminal Manager. For linking Event Driven Language appli- 
cations, this requires that the following be used as the link 
control data set during the SLINK program preparation step: 



o 



OUTPUT output data set, volume 
INCLUDE CDMEMAIN, volume 
INCLUDE object data set, volume 
END 



For example, the link control statements for an Event Driven 
Language application called "QUERY" might be: 



OUTPUT 
INCLUDE 
INCLUDE 
END 



QUERY, EDX002 
CDMEMAIN, EDX003 
QUERY, EDX003 






The subsequent $UPDATE step would then specify the object input 
to be "QUERY, EDX002" and the program output to be 
"QUERY, PRGRMS", where "PRGRMS" is the Multiple Terminal Manag- 
er program volume. 

Note : If the FTAB function is used by the application, the FTAB 
object code must be linked with the application object code. 
This requires that the object module CDMFTAB be included in the 
linking process. The following link control statement must be 
included in the link control data set: 



INCLUDE 



CDMFTAB, volume 



For example: 



OUTPUT 

INCLUDE 

INCLUDE 

INCLUDE 

END 



QUERY, EDX002 
CDMEMAIN, EDX003 
QUERY, EDX003 
CDMFTAB, EDX003 
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FORTRAN Program Preparation 



The Multiple Terminal Manager contains a main routine* 
CDMFMAIN, for supporting FORTRAN applications. CDMFMAIN is the 
Multiple Terminal Manager stub for FORTRAN applications, and 
is object code which enables the Multiple Terminal Manager to 
invoke and pass parameters to the application program. 

It is necessary to link CDMFMAIN with the application object 
module so that the application can communicate with the Multi- 
ple Terminal Manager. For linking FORTRAN applications, this 
requires that the following be used as the link control data 
set during the SLINK program preparation step'. 



OUTPUT output data set, volume 
INCLUDE CDMFMAIN, volume 
INCLUDE object data set, volume 
END 



AUTO= FORT AUTO, ASML IB 



For example, the link control statements for a FORTRAN applica 
tion called "QUERY" might be: 



o 



OUTPUT 
INCLUDE 
INCLUDE 
END 



QUERY, EDX002 AUTO' 
CDMFMAIN, EDX003 
QUERY, EDX003 



FORTAUTCASMLIB 



The subsequent $ U P D A T E step would then specify the object input 
to be "QUERY, EDX002" , and the program output to be 
"QUERY, PRGRMS", where "PRGRMS" is the Multiple Terminal Manag- 



er program volume. 



Note : If the FTAB function is used by the application, the FTAB 
object code must be linked with the application object code. 
This requires that the object module CDMFTAB be included in the 
linking process. The following link control statement must be 
included in the link control data set: 



INCLUDE 
For examp le 



CDMFTAB, volume 



OUTPUT 

INCLUDE 

INCLUDE 

INCLUDE 

END 



QUERY, EDXO 2 AUTO = FORTAUTO , ASML IB 
CDMFMAIN, EDX003 
QUERY, EDX003 
CDMFTAB, EDX003 
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COBOL Program Preparation 



The Multiple Terminal Manager contains a main routine* 
CDMCMAIN, for supporting COBOL applications. CDMCMAIN is the 
Multiple Terminal Manager stub for COBOL applications, and is 
object code which enables the Multiple Terminal Manager to 
invoke and pass parameters to the application program. 

It is necessary to link CDMCMAIN with the application object 
module so that the application can communicate with the Multi- 
ple Terminal manager. For linking COBOL applications, this 
requires that the following be used as the link control data 
set during the SLINK program preparation step: 



4 ~\ 



OUTPUT output data set, volume 
INCLUDE CDMCMAIN, volume 
INCLUDE MTMSUBtl, volume 
INCLUDE MTMSUBtB, volume 
END 



AUTO=COKAUTO,ASMLIB 



In the previous example, MTMSUBtl is the name of the data set 
containing the COBOL compiled output. MTMSUB#B is the name of 
the data set containing the COBOL I/O buffers (if required). 



For example, the link control statements for a COBOL applica 
tion called "QUERY" might be: 



OUTPUT 
INCLUDE 
INCLUDE 
END 



QUERY, EDX002 AUTO=COKAUTO , ASML IB 
CDMCMAIN, EDX003 
MTMSUBtl, EDX003 



V, J 



The subsequent $UPDATE step would then specify the object input 
to be "QUERY, EDX002", and the program output to be 
"QUERY, PRGRMS", where "PRGRMS" is the Multiple Terminal Manag- 
er program volume. 

Note : If the FTAB function is used by the application, the FTAB 
object code must be linked with the application object code. 
This requires that the object module CDMFTAB be included in the 
linking process. The following link control statement must be 
included in the link control data set: 



INCLUDE 
For example 



CDMFTAB, volume 



OUTPUT 

INCLUDE 

INCLUDE 

INCLUDE 

END 



QUERY, EDXO 2 AUT0=C0KAUT0 , ASML IB 
CDMCMAIN, EDX003 
MTMSUBtl, EDX003 
CDMFTAB, EDX003 
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PL/I Program Preparation 



The Multiple Terminal Manager contains a main routine* 
CDMPMAIN, for supporting PL/I applications. CDMPMAIN is the 
Multiple Terminal Manager stub for PL/I applications* and is 
object code which enables the Multiple Terminal Manager to 
invoke and pass parameters to the application program. 




OUTPUT output data set»volume 
INCLUDE CDMPMAIN, volume 
INCLUDE object data set, volume 
END 



AUTO=PLIAUTO,ASMLIB 



For example, the link control statements for a PL/I application 
called "QUERY" might be: 



^"*\ 



OUTPUT 
INCLUDE 
INCLUDE 
END 



QUERY, EDX002 AUTO=PL I AUTO , ASML IB 
CDMPMAIN, EDX003 
QUERY, EDX003 



The subsequent SUPDATE step would then specify the object input 
to be "QUERY, EDX002", and the program output to be 
"QUERY, PRGRMS", where "PRGRMS" is the Multiple Terminal Manag- 
er program volume. 



Note : If the FTAB function is used by the application, the FTAB 
object code must be linked with the application object code. 
This requires that the object module CDMFTAB be included in the 
linking process. The following link control statement must be 
included in the link control data set: 



INCLUDE 
For example 



CDMFTAB, volume 



OUTPUT 

INCLUDE 

INCLUDE 

INCLUDE 

END 



QUERY, EDX002 AUTO=PLI AUTO , ASML IB 
CDMPMAIN, EDX003 
QUERY, EDX003 
CDMFTAB, EDX003 



Chapter 5. Multiple Terminal Manager 



167 



STORAGE REQUIREMENTS 

Listed below are the storage requirements for the Multiple Ter- 
minal Manager. These requirements are in addition to the stor- 
age required for the Multiple Terminal Manager application 
programs* the Event Driven Execut i ve super v i sor > the supervi- 
sor's required device support programs and control blocks. 

Program manager - 12K (K = 1024 bytes) 

Terminal server - IK per terminal for TTY (ASCII) 

.75K per 4978/4979 display 
1.75K per 3101 Model 2 display 

The storage required for Multiple Terminal Manager application 
programs is the larger of 6K or the size of the largest applica- 
tion which includes the application stub. This is the size 
obtained after linking the application via $LINK, 

During system configuration, the above information is used to 
calculate the partition size to code on the SYSTEM statement, 
PARTS= operand. For more information on the SYSTEM statement 
see the System Guide . 
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SYSTEM GENERATION CONSIDERATIONS 



Volume Requirements 

Three volumes must be provided when planning your Event Driven 
Executive system for the Multiple Terminal Manager. These vol- 
umes are : 

• PRGRMS - Multiple Terminal Manager programs volume 

• MTMSTR - Multiple Terminal Manager work volume 

• SCRNS - Multiple Terminal Manager screens volume 

In Multiple Terminal Manager only systems* the most likely 
access frequency distribution of these three volumes would be: 

(1) MTMSTR 

(2) SCRNS 

(3) PRGRMS 

Therefore* it is recommended that these volumes be allocated so 
that the MTMSTR and SCRNS volumes are adjacent to each other 
with PRGRMS on one side or the other. 

If fixed-head disks are to be used, it may be beneficial to 
allocate the MTMSTR volume under the fixed head. (In this case 
the location of SCRNS relative to MTMSTR is irrelevant.) This 
is accomplished by specifying FHVOL=MTMSTR on the appropriate 
system configuration DISK statement. It will not be possible to 
place MTMSTR under the fixed head if the total volume size 
exceeds 480 records for a 4962, or 512 records for a 4963. 
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To calculate the size requirements for each of the three vol- 
umes* first calculate the data set requirements (see the 
section "Data Set Requirements" on page 171). Add to this the 
directory size in number of records* each volume requires TU_ 
directory sizes may be calculated as follows: 



The 



Volume 



Number of Directory 
Records Required 



MTMSTR 



1 Record 



SCRNS 



(number of screens + 2) / 8 
rounded to the next highest 
record 



PRGRMS 



(number of user programs + 9) 
rounded to the next highest 
record 



/ 8 



See the System Guide for 
system configuration. 



a sample Multiple Terminal Manager 



V 



J, 
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Data Set Requirements 



MTNSTORE 



MTMSTORE is the Multiple Terminal Manager work file, and as 
such, it contains: 

• The Multiple Terminal Manager program table. 

• The Multiple Terminal Manager screen table. 

• A program and buffer save area for each terminal defined in 
the TERMINAL f i le. 

The size of the MTMSTORE file can be calculated as follows: 

• Allow 10 bytes per screen in the SCRNS volume; round up to 
the nearest 256-byte record. 

• Allow 14 bytes per program in the PRGRMS volume? round up 
to the nearest 256-byte record. 

• Allow per terminal: 

enough records to hold a copy of the largest 
program in the PRGRMS volume plus 4 records; round 
up to the nearest track; that is, nearest 64 records 
for a 4963 disk or nearest 60 records for a 4962 
disk. 

This data set is in the volume MTMSTR and is normally the only 
data set in that volume. 



TERMINAL 

This file is built with the $ F S E D I T Event Driven Executive 
utility. It contains one record/terminal containing the spec- 
ifications of a terminal. 

The record prototype is: 

Dvtp,Termname,Menuscrn,Y/N 
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The following is a description of the record: 

Dvtp The type of terminal. Specify one of the following 
per termi nal : 



4979 
4978 
3335 
3101 



(IBM 4979 full screen) 

(IBM 4978 full screen) 

(ASR 33/35 line at a time) 

(IBM 3101 Model 2 in block mode) 



Termname The 1 to 8 character name of the terminal. This name 
must be identical with the device name specified on 
the TERMINAL statement at system generation. This 
name should not be the name of the Event Driven Exec- 
utive $SYSL0G device. 



Menuscrn The name of the data set in the SCRNS volume which 
contains the screen to be displayed after an opera- 
tor exits a transaction or signs on. For ASCII termi- 
nals, this field is ignored. 

Y/N Specifies whether the terminal uses SIGNON/SIGNOFF . 

Y = This terminal is required to use the SIGNON and 
SIGNOFF programs. If a user program named SIGNON 
does not appear in the program library, this termi- 
nal is not usab le . 

N = This terminal is always signed on. 

Comment records are acceptable in this file as well as comments 
following specification records. Comment records must have an 
* i n pos i t i on 1 . 

An example of this file would bet 

3101, DIS31010, MENUSCRN, N 
4979,DISPLAY1,MENUSCRN,N 
49 78,DIS4 9 780,MENUSCRN,Y 
33 3 5,ACCA1,MENUSCRN,Y 
/* 

End of specifications must be indicated with a record contain- 
ing /* beginning in column 1. 

Before the Multiple Terminal Manager processes each record 
during startup, the record is listed on the $SYSPRTR device. 
When startup is complete, all terminals will have the Multiple 
Terminal Manager IPL screen displayed. The TERMINAL file is in 
the volume PRGRMS. 



KJ 
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Screen Format Volume - SCRNS 



This volume contains screen data sets for full screen images 
built via the $IMAGE Event Driven Executive utility. These 
screens must have been built with a 24 x 80 dimension size. The 
unprotected fields must be initialized with blanks or default 
data. If a screen is modified or added to the SCRNS volume, the 
Multiple Terminal Manager should be terminated and restarted 
so that the Multiple Terminal Manager can initialize linkage to 
the screens . 



The IPLSCRN data set is displayed on each full screen terminal 
after the Multiple Terminal Manager is started. It requests 
that the operator press the ENTER key to connect the terminal 
to the Multiple Terminal Manager. It should not be displayed 
again. 

Screen definition procedure (under SIMAGE) should always be 
concluded by entering unprotected field initialization mode 
using PF2, even when a fully protected screen is being defined. 



User Application Program Volume 



PRGRMS 






All programs loaded by the Multiple Terminal Manager are loaded 
using the names of the data sets in this volume. The TERMINAL 
and SIGNONFL files are also in this volume. 

Application programs are stored in this volume as the output of 
the $ U P D A T E Event Driven Executive utility. The names of the 
programs are the names used by the operator from the MENU mode 
to invoke programs and can also be used as the program parame- 
ter on a CALL LINK or CALL LINK ON that passes control from one 
program to another. (If an existing program is modified or a 
new program added, the Multiple Terminal Manager should be ter- 
minated and restarted so that Multiple Terminal Manager can 
establish linkage to these changes or additions.) 

When the Multiple Terminal Manager is initiated, a program 
table is built containing the name of each program data set in 
the PRGRMS volume . 

Each program is checked at initialization time to see if the 
program is too big for the program area in the Multiple Termi- 
nal Manager. If the program is too big for the program area in 
the Multiple Terminal Manager, split the program into separate 
programs using LINK or increase the size of the program area. 
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SIGNONFL 



This file contains sign-on records for use by the 5IGN0N pro 
gram. The format of the file is: 



Field Name 
SIGNON ID 
PASSWORD 
USERID 
USER CLASS 
NAME 



Positions 

1-08 

9-12 
13-16 
17-20 
21-32 



Contents 

Sign-on ID number 

Password 

User ID 

User Class 

User Name 



This file is built by using the $FSEDIT Event Driven Executive 
utility. This file is in the volume PRGRMS. A /* in columns 1 
and 2 denote the end of the file. 



\_y 
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Multiple Terminal Manager Data Set Requirements for Execution 



ITEM 



SWAP DATA SET 



VOL ID 



MTMSTR 



DATA SET NAME APPROXIMATE SIZE 



PROGRAM MGR 

4978/4979 TERM 
SERVER 



PRGRMS 
PRGRMS 



3101 TERM SERVER PRGRMS 

TTY TERM SERVER PRGRMS 

MULTIPLE TERMINAL 
MANAGER PRGRMS 

INITIALIZATION 



TERMINAL 

SPECIFICATIONS 

FILE 



PRGRMS 



MTMSTORE 



$MTM 
CDMSVR89 

CDMSVR01 
CDMSVR33 

CDMINIT 

TERMINAL 



See MTMSTORE in the 
Multiple Terminal 
Manager Data Set 
Requirements section 



55 records 

4 records 

8 records 

5 records 

29 records 



1 record 
per 2 
ent r i es 



"\ 



USER APPLICATION 
PROGRAMS 



PRGRMS 



SCREEN FORMATS 



SIGNON FILE 



SCRNS 



PRGRMS 



USER SPECIFIED 
SCREENS 

SIGNONFL 



4 records 
per screen 

1 record 

per 2 entr i es 
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Multiple Terminal Manager Requirements for Program Preparation 



MULTIPLE TERMINAL 
MANAGER STUBS: 

CDMEMAIN 

CDMFMAIN 

CDMCMAIN 

CDMPMAIN 
CDMFTAB 
plus 

Event Driven Executive 
program preparation 
data set requirements 



Approximate size 

6 records each 



2 records 



Requirements for Rebuilding the Multiple Terminal Manager 



MULTIPLE TERMINAL 
MANAGER OBJECT 



Approximate size 
100 records 



Multiple Terminal Manager 

source module: CDMCOMMN 

plus 

Event Driven Executive 

program preparation 

data set requirements 



98 records 



<_-> 
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MULTIPLE TERMINAL MANAGER DEFAULTS AND HOW TO CHANGE 



The Multiple Terminal Manager default system contains the fol- 
lowing limitations. 

• Maximum number of screens - 307 

This number can be increased by increasing the Input or 

Output Buffer size 10 bytes per additional screen. The 

Input Buffer (COMINPUT) and the Output Buffer (COMOUTPT) 
are in the module CDMCOMMN. 

• Maximum number of concurrently open data sets - 14 

This number can be changed by altering the file table size. 
The file table is in the module CDMCOMMN. 

• Maximum number of terminals - 10 

This number can be increased by increasing the terminal 
table size 12 bytes per terminal. The terminal table 
(COMTERM) is in the module CDMCOMMN. 

• Maximum program size - 16K bytes 

This size can be changed by reallocating the CDMDUMMY mod- 
ule to the desired size or by patching the name of your 
largest application program into the PGM1 name position of 
the program manager's program header. The offset in $MTM of 
the name CDMDUMMY is X f D8' 

• Maximum packed screen format size as built by the Event 
Driven Executive screen formatter, $IMAGE - 1024 bytes 

This size can be increased by increasing the screen buffer 
size. The screen buffer (COMPMGR) is in the module 
CDMCOMMN. 

• Maximum number of programs - 73 

This number can be increased by increasing the screen buff- 
er size 14 bytes per program. The screen buffer (COMPMGR) 
is in the module CDMCOMMN. 

Whenever the source module CDMCOMMN is changed, it must be 
reassembled and the program manager must be rebuilt with the 
new CDMCOMMN object module. 

Note : Changes to the screen buffer or Input Buffer must be in 
increments of 256 to facilitate Event Driven Executive disk 
READs. 
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MULTIPLE TERMINAL MANAGER MESSAGES 



NO TERMINALS ARE AVAILABLE: No valid terminal specification 
records found in the TERMINAL file, or, no terminal servers can 
be loaded, or, all terminals are busy. Other messages generated 
indicate the problem area. The manager program is terminated. 

MTMSTORE DATA SET LIMITS EXCEEDED: The specified MTMSTORE file 
is too small. Delete and recreate it larger. The manager has 
been terminated. 

This can occur after adding a new program with a storage 
requirement greater than any previous program's requirement or 
after adding a new terminal or screen. 

PROGRAM AREA TOO SMALL TO HOLD PGM BBBBBBBB : The manager's pro- 
gram area is too small to hold the named program. The program is 
unusable . 



Increase the program area size by reallocating 
split the program into smaller LINKed programs. 



CDMDUMMY or 



BBBBBBBB PROGRAM TYPE INVALID: The named program in the PRGRMS 
volume is not a program type data set. The named program is 
unusab le . 



SIGNON PROGRAM NOT AVAILABLE FOR TERMINAL BBBBBBBB: The speci- 
fied terminal is required to sign on and off but no program 
named SIGNON was found in the PRGRMS volume. The terminal is 
not connected to the Multiple Terminal Manager. 



\ y 



MULTIPLE TERMINAL MANAGER TERMINAL FILE RECORDS: The TERMINAL 
file records processed by the Multiple Terminal Manager are 
listed after this message. Any messages pertaining to a specif- 
ic TERMINAL file record will be displayed immediately after the 
file record . 

DEVICE TYPE INVALID: The device type specified for the TERMINAL 
file record listed immediately before this message is invalid. 
The terminal is not connected. Correct the TERMINAL record. 
Stop and restart the manager. 

INVALID SIGNON CHARACTER: The SIGNON specification for the 
TERMINAL file record listed immediately before this message is 
not "Y" or "N". The terminal is not connected. Correct the TER- 
MINAL record. Stop and restart the manager. 

MENUNAME INVALID: The primary menu name specified for the TER- 
MINAL file record listed immediately before this message is 
invalid. The terminal is not connected. Correct the TERMINAL 
record. Stop and restart the manager. 



178 SC34-0316 



o 



o 



TERMINAL BBBBBBBB NOT DEFINED IN EVENT DRIVEN EXECUTIVE 
SYSTEM: The specified terminal was not included in the defi- 
nition of terminals when the Event Driven Executive system was 
generated. The terminal is not connected. Include a terminal 
definition for the specified terminal when the Event Driven 
Executive system is generated. 

TERMINAL NAME INVALID: The terminal name specified for the TER- 
MINAL file record listed immediately before this message is 
invalid. The terminal is not connected. Correct the TERMINAL 
record. Stop and restart the manager. 

CONNECTED TO MULTIPLE TERMINAL MANAGER: This message is writ- 
ten to a non-full screen type terminal when it is connected to 
the Multiple Terminal Manager. 

LOAD FOR SERVER BBBBBBBB FAILED, RC=CCCCC: A load failure 
occurred during initialization for the specified server. Refer 
to Event Driven Executive messages and codes to determine the 
cause of failure. Ensure that the specified server program is 
in the PRGRMS volume. 

PRIMARY MENU BBBBBBBB FAILED FOR TERMINAL BBBBBBBB: A SETPAN 
function for the primary menu indicated has failed. Ensure that 
a valid menu name is specified in the TERMINAL file for the 
specified terminal. 

DISK ERROR DURING INITIALIZATION, RC = CCCCC : A disk error 
occurred while reading the SCRNS volume directory* the PRGRMS 
volume directory* or the TERMINAL data set. Or* an error 
occurred while writing to the MTMSTORE data set. Determine the 
cause using Event Driven Executive messages and codes. 

SCREEN TABLE LARGER THAN INPUT BUFFER: The screen table built 
during initialization exceeds the Input Buffer size. 

Increase the Input Buffer size in module CDMCOMMN. 

PROGRAM FILE LARGER THAN PROGRAM MANAGER BUFFER: The program 
table built during initialization exceeds the size of the buff- 
er used by the program manager. 

Increase the program manager buffer size in module CDMCOMMN. 

TERMINAL TABLE OR WORK SPACE SIZE EXCEEDED: While building the 
terminal table and loading servers* the storage size or the the 
maximum number of terminals (10) allowed has been exceeded. The 
work space* defined in CDMINIT* is defined to allow a maximum 
of 50 terminals. The terminal table size can be increased by 
changing module CDMCOMMN. 

BBBBBBBB SCREEN SIZE TOO LARGE: The specified screen in the 
SCRNS volume will not fit in the screen manager buffer. 

Increase the screen manager buffer size in CDMCOMMN. 
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BBBBBBBB SETPAN FAILED, RC=CCCCCC: A SETPAN failed for the 
screen name specified. Determine the cause of failure using the 
return code and the Multiple Terminal Manager SETPAN documen- 
tation. 

TERMINAL BBBBBBBB BUSY: A terminal specified in the TERMINAL 
file is connected to another program. 

Try to RECONNECT at a later time. 

ERROR ENCOUNTERED DURING CLOSE OF INDEXED ACCESS METHOD 
(DDDDDDDD, VVVVVV) , ERROR CODE= (cccccc ) : An error occurred dur- 
ing AUTOCLOSE of an Indexed Access Method data set. 

INITIALIZATION ERROR: Initialization has been unsuccessful. 
Multiple Terminal Manager is terminated. This message is writ- 
ten to the terminal which loaded Multiple Terminal Manager. 
Additional messages are printed on $SYSPRTR. 

INVALID PROGRAM NAME: The name of the program requested from 
the primary menu was not found in the Multiple Terminal Manager 
program table or invalid parameters supplied on a DISCONNECT 
command . 

INVALID TERMINAL: The terminal name entered with a DISCONNECT 
command is not a Multiple Terminal Manager terminal. 

PROGRAM LOAD ERROR: An Event Driven Executive LOAD error / - 

occurred for the requested program. v 

DISK READ ERROR: An internal Multiple Terminal Manager disk 
Read error has occurred and results may be unpredictable. 

TERMINAL BBBBBBBB RECONNECTED: The named terminal has been 
reconnected to the Multiple Terminal Manager. 

RECONNECT SYNTAX INVALID: The RECONNECT operator interface 
facility is invalid and the proper syntax has not been used. 

RECONNECT TERMINAL DEFINITION ERROR: The RECONNECT operator 
interface facility has encountered a failure while attempting 
to reconnect a terminal to the Multiple Terminal Manager. Since 
initialization would have already performed all functions 
necessary to include the terminal in the terminal table, the 
TERMINAL file, SCRNS volume or source table in RECONNEC has 
probably been altered since the Multiple Terminal Manager was 
started . 

BBBBBBBB DISCONNECT: Terminal bbbbbbbb has been issued a suc- 
cessful DISCONNECT command. 
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MULTIPLE TERMINAL MANAGER SYSTEM FAILURE: The Multiple Termi- 
nal Manager task error exit routine has been entered due to a 
machine or program error. The Multiple Terminal Manager 
program remains active waiting for an event which will not be 
posted . 

The PSN and LSB at the time of failure has been saved at a 
displacement of X * 1 7 2 f into the program storage. Register 1 in 
the LSB contains the address of the failing instruction in the 
case of a program check. Use Event Driven Executive operator 
facilities to display storage. 



An example follows showing 
occurred at location X T 053C'. 



a specification check which 



MULTIPLE 
> $A 



TERMINAL MANAGER SYSTEM FAILURE 



f^X 



PROGRAMS AT 00:06:24 
IN PARTITION #2 
$MTM 0000 * 
CDMSVR33 6C00 
> $D 172 30 X 



0172 
0182 
0192 



8002 

0540 
0052 



28E6 
815C 
007C 



0110 
00B8 
00A6 



10D0 
0DDA 
0017 



0DDC 
0000 
0E72 



053C 

00FA 
A0A2 



01A2: 0102 8026 1616 40C9 D5C9 E3C9 
ANOTHER DISPLAY? 



0DAC 7361 
0004 0028 
0E72 FFFF 



The PSH is 8002 at 0172 and Rl is 053C on same line. 
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EXAMPLE - FILE MAINTENANCE TRANSACTION APPLICATION 

This example consists of a pair of programs which perform a 
simple file maintenance task. The tasks it can perform are 
reading or writing a single record* or setting an end of data 
(EOD) marker. Both programs are presented in the following lan- 
guages : 

• Event Driven Language (see "EDL Sample Progl" on page 190 
and "EDL Sample Prog2" on page 191) 

• COBOL (see "COBOL Sample Progl" on page 193 and "COBOL 
Sample Prog2" on page 195) 

• FORTRAN (see "FORTRAN Sample Progl" on page 197 and 
"FORTRAN Sample Prog2" on page 198) 

• PL/I (see "PL/I Sample Progl" on page 200 and "PL/I Sample 
Prog2" on page 202) 

The first program displays a screen which requests the file 
parameters which include data set name and relative record num- 
ber. It then LINKs to the second program* passing the file 
parameters . 

The second program builds a file control area (FCA) from the 
file parameters and performs the requested file I/O operation. /"^ 

The results of the operation are displayed on the screen, and L y 

the program ends. 

The following is a detailed explanation of each program state- 
ment in Event Driven Language and the effects of program exe- 
cution of the application. 

The first statements in the first program are declarations. 

EXTRN BEEP, SETP AN, MENU, ACTION, LINK 

ENTRY MTMSUB 

SUB ROUT MTMSUB,INBADDR,OUTBADDR,TEBADDR,IIBADDR 

EXTRN declares Multiple Terminal Manager functions as 
external, so they may be accessed by the application. ENTRY 
declares the application as an entry point. All Multiple Termi- 
nal Manager applications are subroutines, as depicted in the 
SUBROUT statement, called MTMSUB. They all have four parame- 
ters, the addresses of the Input Buffer, Output Buffer, Termi- 
nal Environment Block and Interrupt Information Byte. (The 
latter two are not used in this example.) 

The next instructions put the buffer addresses into registers 1 
and 2 . 

MOVE #1,INBADDR 
MOVE #2,0UTBADDR 
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The terminal is prepared to sound the audible alarm by: 

CALL BEEP 

A screen image is retrieved from a disk data set and placed into 
the buffers . 

CALL SETPAN, (REQSCRN) , CRC) 



f\ 



RC 
REQSCRN 



DATA 
DATA 



F f 0' 
CL8' 



REQ 



A scr 

dat a , 

unpro 

prote 

chara 

data 

these 

( Sere 

the U 

sages 



een 

wh i 
tect 
cted 
cter 
entr 
nu 1 
en i 
ti li 



and 



image consists of two portions. These are protected 
ch may be considered a screen template or form, and 
ed data, usually considered default information. The 
data is a screen sized (24 x 80) image consisting of 
data which is displayed, and fields of nulls used for 
y. Default data is written by the ACTION call into 
1 fields and operator inputs are read from them, 
mages are constructed using the $ I M A G E utility. See 
ties, Operator Commands, Program Preparation, Mes- 
Codes for detailed information on $IMAGE.) 



Note that both the protected and unprotected parts of a screen 
built by SIMAGE must be explicitly initialized by the user; 
failure to do so causes CALL SETPAN to return return code 2 when 
the screen is retrieved for use by an application program. 

After the call to SETPAN, the Input Buffer contains the screen 
as shown in SCREEN 1, with five null fields as depicted by dol- 
lar signs. The $ is for illustrative purposes only, null fields 
are actually displayed as blanks. 



SCREEN 1 



DATA SET, VOLUME NAME ==>$$$$$$$$,$$$$$$ 
REQUEST (READ, WRIT, SEOD) ==>$$$$ 
RELATIVE RECORD NUMBER ==>$$$$ 
NUMBER OF RECORDS ==>1 
DATA TO BE WRITTEN: 
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The Output Buffer contains data used to initialize (unpro- 
tected) input fields. It consists of 14 blanks, followed by 
READ0001, followed by 80 blanks. When written to the unpro- 
tected portion of the screen? the terminal appears as shown in 
SCREEN 2. An example of SCREEN 2 is on the following pages. 






(14 BLANKS) READ0001 



(80 BLANKS) 



The Input Buffer holds the screen format, and the Output Buffer 
contains fields to initialize input fields. 

A test of the return code from SETPAN is done. If the return 
code does not indicate a successful return, the program ends by 
giving control to the primary menu routine. 

IF (RC,NE,-1) 

CALL MENU 
ENDIF 

Call the ACTION routine to display the contents of the buffers, 
and read the operator response. 



CALL ACTION 
ACTION'S effects are: 



V .J 



• Write the Input Buffer's contents to the terminal as pro- 
tected characters. 

• Write the Output Buffer contents , if any, into the null 
fields as unprotected characters. 

• Wait for the operator to enter data and press ENTER or a PF 
key . 

• Read the contents of the unprotected fields, (that is the 
operator input) into the Input Buffer, 

This results in SCREEN 2 appearing on the terminal, where the 
default characters are highlighted. 
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o 



DATA SET, VOLUME NAME ==> 
REQUEST (READ, WRIT, SEOD) ==>READ 
RELATIVE RECORD NUMBER ==>0001 
NUMBER OF RECORDS ==>1 
DATA TO BE WRITTEN: 



The operator then enters data, changing the default data asso- 
ciated with relative record number. For example, to read the 
third record of data set "K" on volume EDX013, the following 
data would be entered. See highlighted fields on SCREEN 3. 



o 



SCREEN 3 



DATA SET, VOLUME NAME ==>K ,EDX013 
REQUEST (READ, WRIT, SEOD) ==>READ 
RELATIVE RECORD NUMBER ==>0003 
NUMBER OF RECORDS ==>1 
DATA TO BE WRITTEN: 



The operator signals that the input is ready by pressing ENTER 
or a PF key. ACTION then completes the input cycle by reading 
the contents of the unprotected fields into the Input Buffer. 
See the following example of the Input Buffer. 
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EDX013READ0003 



(80 blanks) 



J 



In order for PR0G2 ("EDL Sample Prog2" on page 191, "COBOL 
Sample Prog2" on page 195, "FORTRAN Sample Prog2" on page 198 
and "PL/I Sample Prog2" on page 202), to receive the file 
parameters they must be passed through the Output Buffer. The 
next instruction moves the input data from the Input Buffer to 
the Output Buffer. 

MOVE CO, #2), C0,#1), (106, BYTES) 

Finally, PR0G2 is LINKed to. 

CALL LINK, (IOPROG) 

IOPROG DATA CL8'PR0G2 T 

A call to MENU to terminate the transaction is placed after the 
LINK, in case the LINK is unsuccessful. 

CALL MENU 

The first four lines of PR0G2 are similar to those of PR0G1, 
except that other functions are declared external, and only 
register 2 is assigned a buffer address. 

EXTRN FILEIO,SETPAN, MENU, ACTION 

ENTRY MTMSUB 

SUB ROUT MTMSUB,INBADDR,OUTBADDR,TEBADDR,IIBADDR 

MOVE #2,0UTBADDR 

At this point the Output Buffer (pointed to by register #2) 
contains various file parameters. A file control area (FCA) is 
constructed using these parameters. For example, the request 
type is moved from the Output Buffer to the FCA. 

MOVE FCAREQ,(REQTYPE,#2), (4, BYTES) 

FCAREQ DATA CL4 1 » 



REQTYPE EQU 



14 



Similarly, other fields must be moved, and relative record num- 
ber must be converted to numeric. 
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* SET UP FILE CONTROL AREA AND BUFFER. 

MOVE FCAREQ, (REQTYPE,#2) , (MBYTES) REQUEST TYPE 

MOVE FCADSN, (DSNAME,#2), (8, BYTES) DATA SET NAME 

MOVE FCANUM,1 NUMBER OF RECS 
CONVTD FCARRN, (RRN, #2) , FORMAT= ( 4 , , I) CONVERT RRN 

MOVE FCAVOL, (VOLNAME,#2) , (6, BYTES) VOLUME NAME 

MOVE BUFFER, (BUFFDISP, #2) , (80, BYTES) DATA BUFFER 



* FILE CONTROL AREA. 



FCA 

FCAREQ 
FCADSN 
FCANUM 

FCAEOD 

FCARRN 
FCAVOL 



EQU 

DATA 

DATA 

DATA 

DATA 

DATA 

DATA 

DATA 

DATA 



* 

CL4 

CL8 

F 1 1 

F'O 

F f 

F'O 

F T 

CL6 



REQUEST TYPE 
DATA SET NAME 
NUMBER OF RECORDS 

EOD RELATIVE RECORD NUMBER 

RELATIVE RECORD NUMBER 
VOLUME NAME 



* EQUATES FOR 






DSNAME 

VOLNAME 

REQTYPE 

RRN 

BUFFDISP 

EODRRN 

RCDISP 



EQU 
EQU 
EQU 
EQU 
EQU 
EQU 
EQU 



OUTPUT BUFFER DATA. 

8 

14 
18 
22 
102 
106 



DATA SET NAME 

VOLUME NAME 

REQUEST TYPE 

RELATIVE RECORD NUMBER 

BUFFER DISPLACEMENT 

EOD RRN DISPLACEMENT 

RETURN CODE DISPLACEMENT 



A screen image with which to display the file data is 
retrieved, and the return code is checked. This screen is simi- 
lar to the previous screens shown with the addition of two new 
fields. 






CALL SETPAN, (LISTSCRN) , (RC) 
IF (RC,NE,-1) 

CALL MENU 
ENDIF 



LISTSCRN DATA CL8'LST T 
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At this point the image depicted in SCREEN 4 is in the buffers. 
Since there is no default data, the Output Buffer is empty. 

SCREEN 4 



DATA SET, VOLUME NAME = = >, 
REQUEST (READ, WRIT, SEOD) 
RELATIVE RECORD NUMBER ==> 
NUMBER OF RECORDS ==>1 
DATA TO BE WRITTEN: 



= = > 



EOD RELATIVE RECORD NUMBER 
RETURN CODE ==> 






The actual FILEIO operation is performed, specifying the FCA, a 
buffer, and a return code. 



V. --> 



CALL 



FILEIO, (FCA ),(BUFFER),(RC) 



RC 
BUFFER 



DATA 
DATA 



F ? f 
256X T f 



Note that the buffer is 256-bytes in length (the length of an 
Event Driven Executive record) even though only the first 80 
bytes are used . 

Now that all the file data is available, it is placed in the 
Output Buffer so that it can be displayed. The data is taken 
from the FCA, the buffer and return code, and concatenated so 
that it may be written into the unprotected fields of the 
screen i mage . 

* PUT DATA INTO OUTPUT BUFFER SO IT WILL BE DISPLAYED. 

MOVE (REQTYPE,#2),FCAREQ, (4, BYTES) REQUEST TYPE 

MOVE (DSNAME,#2),FCADSN, (8, BYTES) DATA SET NAME 

CONVTB (E0DRRN,#2) , FCAEOD , F0RMAT= ( 4 , , I ) CONV EOD RRN 

CONVTB (RRN,#2),FCARRN,FORMAT=(4,0,I) CONVERT RRN 

MOVE (VOLNAME,#2) ,FCAVOL, (6, BYTES) VOLUME NAME 

MOVE (BUFFDISP, #2) , BUFFER, (80, BYTES) DATA 

CONVTB (RCDISP,#2) , RC , FORMAT= ( 4 , , I ) CONV RET CODE 
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The Output Buffer now looks as follows: 



EDX013READ0003RECORD 3(72 b lanks ) 0005-001 



Both Input and Output buffers are displayed on the screen by 
the f o 1 lowi ng : 

CALL ACTION 

The following is an example of the displayed screen: 

SCREEN 5 



o 



RECORD 3 



DATA SET, VOLUME NAME ==>K ,EDX013 
REQUEST (READ, WRIT, SEOD) ==>READ 
RELATIVE RECORD NUMBER ==>0003 
NUMBER OF RECORDS ==>1 
DATA TO BE WRITTEN: 



EOD RELATIVE RECORD NUMBER 
RETURN CODE ==>0000 



==>0005 



A call to ACTION waits for operator input followed by an ENTER 
or PF key. In this case no input is desired; however, the use of 
ACTION allows the user to view the screen and press ENTER after 
the contents have been read. At that point the program ends. 



CALL 



MENU 



The following pages contain the applications used to perform 
the example previously shown. 



The first sample application uses Event Driven Language, 
second uses COBOL, the third FORTRAN, and the fourth PL/I. 



the 
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EDL Sample Progl 



* BE 

* RE 



* DI 

* MO 

* LI 

* AB 

xx** 

* 

* 

* 

**** 

REQS 

IOPR 

RC 



EXT 
ENT 
SUB 
MOV 
MOV 

EP UPON 
CAL 

TRIEVE S 
CAL 
IF 

C 
END 

SPLAY SC 
CAL 

VE DATA 
MOV 

NK TO PR 
CAL 

ORT IF L 
CAL 

******** 



RN 

RY 

ROUT 

E 

E 



BE 
MT 
MT 
#1 
#2 



TERMINAL 
L BE 
CREEN IM 
L SE 
(R 
ALL 
IF 

REEN 
L 

FROM 
E 
OGRAM 



EP,SETPAN 
MSUB 

MSUB,INBA 
, INBADDR 
,OUTBADDR 

10. 
EP 

AGE AND A 
TPAN, (REQ 
C,NE,-1) 

MENU 



, MENU, ACTION, LINK 

DDR,OUTBADDR,TEBADDR,IIBADDR 

GET INPUT BUFF ADDRESS 
GET OUTPUT BUFF ADDRESS 



BORT IF ERROR. 

SCRN),(RC) GET SCREEN IMAGE 

OK? 

NO 



IMA 

AC 

INP 

(0 

WH 

L LI 
INK FAIL 
L ME 
******** 



GE, READ OPERATOR RESPONSE. 

TION 

UT BUFFER 

,#2), (0,# 

ICH WILL 

NK, (IOPRO 

S. 

NU 

********* 



TO OUTPUT BUFFER (106 BYTES). 
1) , (106, BYTES) 
PERFORM FILE 10. 
G) 



DATA ITEMS 



******************************** 

* 
* 
* 
*********************************************x*********** 

NAME OF REQUEST SCREEN 
NAME OF 10 PROGRAM 
RETURN CODE 






CRN 
OG 



DATA 

DATA 

DATA 

ENDPROG 

END 



CL8'REQ' 

CL8'PR0G2 f 

F'O f 



v 



J 
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EDL Sample Prog2 



o 



o 



* SET UP 



* RETR 



PERF 
* PUT 



* DISP 

* END 

* 

****** 

* 

LISTSC 

RC 

BUFFER 

* FILE 
FCA 

FCAREQ 
FCADSN 
FCANUM 

FCAEOD 

FCARRN 
FCAVOL 



EXTR 
ENTR 
SUBR 
MOVE 
FILE 
MOVE 
MOVE 
MOVE 
CONV 
MOVE 
MOVE 

IEVE LI 
CALL 
IF 

CA 
ENDI 

ORM FIL 
CALL 

DATA IN 
MOVE 
MOVE 
CONV 
CONV 
MOVE 
MOVE 
CONV 

LAY SCR 
CALL 

PROGRAM 
CALL 

******* 



N 
Y 
OUT 



TD 



FI 
MT 
MT 
#2 
CONTR 
FC 
FC 
FC 
FC 
FC 
BU 

STING 
SE 
(R 

LL M 

F 

E 10. 
FI 



TO 



TB 

TB 



TB 
EEN 



OUT 
(R 
(D 
(E 
(R 
(V 
(B 
(R 
IM 
AC 



LEIO,SETPAN,MENU,ACTION 

MSUB 

MSUB,INBADDR,OUTBADDR,TEBADDR,IIBADDR 

,OUTBADDR GET 0/P BUFFER ADDR 

OL AREA AND BUFFER. 

AREQ, (REQTYPE,#2) , (MBYTES) REQST TYPE 

ADSN, (DSNAME,#2), (8, BYTES) DATA SET NAME 

ANUM,1 NUMBER OF RECS 

ARRN, (RRN,#2),FORMAT=(4,0,I) CONVERT RRN 

AVOL, (V0LNAME,#2), (6, BYTES) VOLUME NAME 

FFER, (BUFFDISP,#2), (80, BYTES) DATA BUFFER 

SCREEN AND ABORT IF ERROR. 

TPAN, (LISTSCRN), (RC) 

C,NE,-1) GOT SCREEN IMAGE OK? 

ENU NO 



LEIO,(FCA),(BUFFER),(RC) 

PUT BUFFER SO IT WILL BE DISPLAYED. 

EQTYPE, #2), FCAREQ, (4, BYTES) REQUEST TYPE 

SNAME, #2), FCADSN, (8, BYTES) DATA SET NAME 

ODRRN, #2) , FCAEOD, F0RMAT=(4, 0,1) CONV EOD RRN 

RN, #2) , FCARRN, F0RMAT=(4, 0,1) CONVERT RRN 

OLNAME, #2), FCAVOL, (6, BYTES) VOLUME NAME 

UFFDISP, #2), BUFFER, (80, BYTES) DATA 

CDISP,#2) ,RC,F0RMAT=(4,0,I) CONV RET CODE 

AGE AND DATA. 

TION 



MENU 
************************************************ 

* 
DATA ITEMS * 

* 
******************************************************* 



RN DATA 
DATA 
DATA 
CONTROI 
EQU 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 



CL8'LST 
F f f 
256X T f 
AREA. 
* 

CL4* ' 
CL8' f 
F f 1 » 
F'O* 
F'0 f 
F'O 1 
F'0 f 
CL6 f • 



NAME OF LISTING SCREEN 
RETURN CODE 
DATA BUFFER 



REQUEST TYPE 
DATA SET NAME 
NUMBER OF RECORDS 

EOD RELATIVE RECORD NUMBER 

RELATIVE RECORD NUMBER 
VOLUME NAME 
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EDL Sample Prog2 (continued) 

* EQUATES FOR OUTPUT BUFFER DATA. (f J 

DSNAME EQU DATA SET NAME ^~^ 

VOLNAME EQU 8 VOLUME NAME 

REQTYPE EQU 14 REQUEST TYPE 

RRN EQU 18 RELATIVE RECORD NUMBER 

BUFFDISP EQU 22 BUFFER DISPLACEMENT 

EODRRN EQU 102 EOD RRN DISPLACEMENT 

RCDISP EQU 106 RETURN CODE DISPLACEMENT 

ENDPROG 

END 



^\_ j? 



o 
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COBOL Sample Progl 



o 



IDENTIFICATION DIVISION. 
PROGRAM-ID. 

MTMSUB. 
* 
ENVIRONMENT DIVISION. 
CONFIGURATION SECTION. 
SOURCE-COMPUTER. 

IBM-SI. 
OBJECT-COMPUTER. 

IBM-SI. 
* 
DATA DIVISION. 
WORKING-STORAGE SECTION. 

77 REQUEST-SCREEN PIC X(8) VALUE "REQ 
77 IO-PROGRAM PIC X(8) VALUE "PROG2 

77 RC PIC S99 USAGE IS COMPUTATIONAL 

LINKAGE SECTION. 
01 INPUT-BUFFER. 

05 DATA-SET-NAME PIC X(8). 

05 VOLUME-NAME PIC X(6). 

05 REQUEST-TYPE PIC X(4). 

05 RELATIVE-RECORD-NUMBER PIC 9999. 

05 BUFFER-DATA PIC X(80). 
01 OUTPUT-BUFFER. 

05 DATA-SET-NAME PIC X(8). 

05 VOLUME-NAME PIC X(6). 

05 REQUEST-TYPE PIC X(4). 

05 RELATIVE-RECORD-NUMBER PIC 9999. 

05 BUFFER-DATA PIC X(80). 

05 EOD-RRN PIC 9999. 

05 RETURN-CODE PIC 9999. 
77 TEB PIC X(IOO) . 

77 IIB PIC 99 COMP. 
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COBOL Sample Progl (continued) 

* w 

PROCEDURE DIVISION 

USING INPUT-BUFFER, OUTPUT-BUFFER, TEB, IIB. 
BEGIN. 

* BEEP UPON TERMINAL 10. 

CALL "BEEP". 

* RETRIEVE SCREEN IMAGE AND ABORT IF ERROR. 

CALL "SETPAN" USING REQUEST-SCREEN, RC. 
IF RC IS NOT EQUAL TO -1 
CALL "MENU". 

* DISPLAY SCREEN IMAGE, READ OPERATOR RESPONSE. 

CALL "ACTION". 

* MOVE DATA FROM INPUT BUFFER TO OUTPUT BUFFER. 

MOVE CORRESPONDING INPUT-BUFFER TO OUTPUT-BUFFER. 

* LINK TO PROGRAM WHICH WILL PERFORM FILE 10. 

CALL "LINK" USING IO-PROGRAM. 

* ABORT IF LINK FAILS. 

CALL "MENU". 
RETURN-POINT. 

EXIT PROGRAM. 



V j 
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COBOL Sample Prog2 



IDENTIFICATION DIVISION. 
PROGRAM-ID 

MTMSUB. 
* 
ENVIRONMENT DIVISION. 
CONFIGURATION SECTION. 
SOURCE-COMPUTER. 

IBM-SI. 
OBJECT-COMPUTER. 

IBM-SI. 
* 
DATA DIVISION. 
WORKING-STORAGE SECTION. 

77 LIST-SCREEN PIC X(8) VALUE "LST ". 
77 RC PIC S99 USAGE IS COMP. 

77 BUFFER PIC X(256) . 

01 FILE-CONTROL-AREA. 

05 REQUEST-TYPE PIC X(4). 

05 DATA-SET-NAME PIC X(8). 

05 NUMBER-OF-RECORDS PIC S999 USAGE COMP VALUE 1 

05 FILLER PIC S99. 

05 EOD-RRN PIC S999 USAGE IS COMP. 

05 FILLER PIC S99. 

05 RELATIVE-RECORD-NUMBER PIC S999 USAGE COMP. 

05 VOLUME-NAME PIC X(6). 
LINKAGE SECTION. 

01 INPUT-BUFFER PIC XC1920). 
01 OUTPUT-BUFFER. 

05 DATA-SET-NAME PIC X(8). 

05 VOLUME-NAME PIC X(6). 

05 REQUEST-TYPE PIC X(4). 

05 RELATIVE-RECORD-NUMBER PIC 9999. 

05 BUFFER-DATA PIC X(80). 

05 EOD-RRN PIC 9999. 

05 RETURN-CODE PIC 9999. 
77 TEB PIC X(IOO). 

77 IIB PIC 99 COMP. 
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COBOL Sample Prog2 (continued) 

* % 
PROCEDURE DIVISION ^ 

USING INPUT-BUFFER, OUTPUT-BUFFER, TEB, IIB. 

BEGIN. 

* SET UP FILE CONTROL AREA. 

MOVE CORRESPONDING OUTPUT-BUFFER 

TO FILE-CONTROL-AREA. 
MOVE BUFFER-DATA TO BUFFER. 

* RETRIEVE LISTING SCREEN AND ABORT IF ERROR. 

CALL "SETPAN" USING REQUEST-SCREEN, RC. 
IF RC IS NOT EQUAL TO -1 
CALL "MENU". 

* PERFORM FILE 10. 

CALL "FILEIO" USING FILE-CONTROL-AREA, BUFFER, RC. 

* PUT DATA INTO OUTPUT BUFFER SO IT NILL BE DISPLAYED. 

MOVE CORRESPONDING FILE-CONTROL-AREA 

TO OUTPUT-BUFFER. 
MOVE BUFFER TO BUFFER-DATA OF OUTPUT-BUFFER. 
MOVE RC TO RETURN-CODE OF OUTPUT-BUFFER. 

* DISPLAY SCREEN IMAGE. 

CALL "ACTION". 

* END PROGRAM. 

CALL "MENU". 
RETURN-POINT. 

EXIT PROGRAM. 



y 
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FORTRAN Sample Progl 



o 



^PROCESS NOCMPAT 

SUBROUTINE MTMSUB ( INBUFF , OUTBUF, TEB, IIB) 

IMPLICIT INTEGER (A-Z) 

INTEGER TEBC50), IIB 

INTEGER*2 INBUFFC960), OUTBUFC512) 

EXTERNAL BEEP , SETP AN , ACTION , MENU , L INK 

REAL*8 REQSCR /'REQ '/, IOPROG / f PROG2 •/ 

INTEGER RC 
C 

C BEEP UPON TERMINAL 10. 
C 

CALL EDXCBEEP, 0) 
C 

C RETRIEVE SCREEN AND ABORT IF ERROR. 
C 

CALL EDXCSETPAN, 2, I ADDR ( REQSCR ) , IADDR(RC) ) 

IF (RC.NE.-l) CALL EDXCMENU, 0) 
C 

C DISPLAY SCREEN IMAGE, READ OPERATOR RESPONSE. 
C 

CALL EDXCACTION, 0) 
C 

C MOVE DATA FROM INPUT BUFF TO OUTPUT BUFF. (106 BYTES) 
C 

DO 10 1=1,53 

OUTBUF(I) = INBUFF(I) 
10 CONTINUE 
C 

C LINK TO PROGRAM WHICH WILL PERFORM FILE 10. 
C 

CALL EDXCLINK, 1, I ADDR ( IOPROG ) ) 
C 

C ABORT IF LINK FAILS. 
C 

CALL EDXCMENU, 0) 

RETURN 

END 
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FORTRAN Sample Prog2 



^PROCESS NOCMPAT 

SUBROUTINE MTMSUB ( INBUFF , OUTBUF, TEB, IIB) 

IMPLICIT INTEGER (A-Z) 

INTEGER TEB(50), IIB 

INTEGER*2 INBUFF(960), OUTBUFC512) 

EXTERNAL F I LE 10, SETPAN, ACTION , MENU 

EXTERNAL $ I 2C0T , $ I 2CIN 

INTEGER BUFFERC128) 

REAL*8 LSTSCR /'LST •/ 

INTEGER RC, FOUR/4/, RES/0/ 
C FILE CONTROL AREAS 

INTEGER FCA(14) 
C REQUEST TYPE 

EQUIVALENCE ( REQ, FCA ( 1 ) ) , ( REQ1 , FCA( 1 ) ) , ( REQ2 , FCA ( 2 ) ) 

INTEGER** REQ 

INTEGER*2 REQ1, REQ2 
C DATA SET NAMES 

EQUIVALENCE (DSN, FCA(3)) 

INTEGER DSN(4) 
C NUMBER OF RECORDS 

EQUIVALENCE (NUMREC, FCAC7)) 

INTEGER NUMREC /l/ 
C END OF DATA RELATIVE RECORD NUMBER 

EQUIVALENCE (EODRRN, FCAC9)) 

INTEGER EODRRN 
C RELATIVE RECORD NUMBER \ y 

EQUIVALENCE (RRN, FCA(ID) 

INTEGER RNN 
C VOLUME NAME 

EQUIVALENCE (VOL, FCAC12)) 

INTEGER VOL (3) 

CALL EDXCACTION, 0) 
C 

C SET UP FILE CONTROL AREA. 
C 

DO 10 1=1,4 
10 DSN(I) = OUTBUF(I) 

DO 20 1=1,3 
20 VOL(I) = 0UTBUF(I+4) 

REQ1 = 0UTBUF(8) 

REQ2 = OUTBUFC9) 
C 

C CONVERT RELATIVE RECORD NUMBER TO NUMERIC 
C 

CALL $I2CIN(RRN, FOUR, OUTBUF (10) , RES, RES, RES, RES) 

DO 30 1=1,40 

BUFFER(I)= OUTBUFCI+11) 
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c 



FORTRAN Sample Prog2 (continued) 

30 CONTINUE 

C 

C RETRIEVE LISTING SCREEN AND ABORT IF ERROR. 

C 

CALL EDXCSETPAN, 2, I ADDR ( LSTSCR ) , IADDR(RC) ) 

IF (RC.NE.-l) CALL EDXCMENU, 0) 
C 

C PERFORM FILE 10. 
C 

CALL EDX(FILEI0,3,IADDR(FCA) , I ADDR C BUFFER ) ,IADDR(RO) 
C 

C PUT DATA INTO OUTPUT BUFFER SO THAT IT IS DISPLAYED. 
C 

DO 40 1=1,4 

OUTBUF(I)= DSN(I) 
40 CONTINUE 

DO 50 1=1,3 

OUTBUFCI+4) = VOL(I) 
50 CONTINUE 

0UTBUFC8) = REQ1 

OUTBUFC9) = REQ2 
C 

C CONVERT RELATIVE RECORD NUMBER TO EBCDIC 
C 

CALL $I2COTCRRN,FOUR,OUTBUF(10) , RES , RES , RES , RES ) 

DO 60 1=1,40 

OUTBUFCI+11) = BUFFER(I) 
60 CONTINUE 
C 

C CONVERT EOD RELATIVE RECORD NUMBER TO EBCDIC 
C 

CALL $I2COTCEODRRN,FOUR,OUTBUF(52) , RES , RES , RES , RES) 
C 

C CONVERT RETURN CODE TO EBCDIC 
C 

CALL $I2C0TCRC,F0UR,0UTBUFC54) , RES, RES, RES, RES) 
C 

C DISPLAY SCREEN IMAGE. 
C 

CALL EDXCACTION, 0) 
C 

C END PROGRAM. 
C 

CALL EDXCMENU, 0) 

RETURN 

END 
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I PL/I Sample Progl 



MTMSUB: PROCEDURE ( INPUT_BUFFER , 

OUTPUT__BUFFER, 
TEB, 
IIB) ; 



DECLARE 

01 INPUT 



BUFFER, 



05 DATA__SET_NAME 

05 VOLUME_NAME 

05 REQUEST_TYPE 

05 RELATIVE_RECORD_NUMBER 

05 BUFFER_DATA 

DECLARE 

01 OUTPUT_BUFFER, 

05 DATA_SET_NAME 

05 VOLUME_NAME 

05 REQUEST_TYPE 

5 RELATIVE_RECORD_NUMBER 

05 BUFFER_DATA 

05 EOD_RRN 

05 RETURN CODE 



CHARACTER 
CHARACTER 
CHARACTER 
CHARACTER 
CHARACTER 



(8), 
(6), 

(4) , 
(4), 
(80); 



CHARACTER (8), 
CHARACTER (6), 
CHARACTER (4), 
PICTURE '9999', 
CHARACTER (80), 
PICTURE '9999', 
PICTURE ? S999 f J 



DECLARE 

(TEB, IIB) BINARY FIXED (15); 

DECLARE 

(SETPAN, ACTION, BEEP, LINK, MENU) ENTRY; 

DECLARE 

REQUEST_SCREEN CHARACTER (8) INITIAL CREQ 1 ) STATIC; 

DECLARE 

PROGRAM_NAME CHARACTER (8) INITIAL (»PROG2 f ) STATIC; 

DECLARE 

RETURN CODE BINARY FIXED (15) STATIC; 



( 



J 



X 



J 
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PL/I Sample Progl (continued) 

/* BEEP UPON TERMINAL 10. */ 
CALL beep; 



/* RETRIEVE SCREEN IMAGE AND ABORT IF ERROR. */ 
CALL SETPAN ( REQUEST_SCREEN , RETURN_CODE ) ; 
IF RETURN_CODE -= -1 
THEN CALL MENU; 

/* DISPLAY SCREEN IMAGE, READ OPERATOR RESPONSE. */ 
CALL ACTION; 

/* MOVE DATA FROM INPUT BUFFER TO OUTPUT BUFFER */ 

OUTPUT_BUFFER.DATA_SET_NAME = INPUT_BUFFER . DATA_SET_NAME J 
OUTPUT_BUFFER.VOLUME_NAME = INPUT_BUFFER . VOLUME_NAME ; 
OUTPUT_BUFFER.REQUEST_TYPE = INPUT_BUFFER . REQUEST_TYPE ; 
OUTPUT_BUFFER.RELATIVE_RECORD_NUMBER 

= INPUT_BUFFER.RELATIVE_RECORD_NUMBER; 
OUTPUT_BUFFER.BUFFER_DATA = INPUT_BUFFER . BUFFER_DATA ; 

/* LINK TO PROGRAM WHICH NILL PERFORM FILE 10. */ 
CALL LINK (PROGRAM NAME); 



o 



/* ABORT IF LINK FAILS. */ 
CALL MENU; 

END; 
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/if \ 



PL/I Sample Prog2 



MTMSUB: PROCEDURE ( INPUT_BUFFER , 

OUTPUT_BUFFER, 
TEB, 
PF_KEY); 

DECLARE 

01 OUTPUTJBUFFER, 

05 DATA_SET_NAME CHARACTER (8), 

05 VOLUME_NAME CHARACTER (6), 

05 REQUEST_TYPE CHARACTER (4), 
05 RELATIVE_RECORD_NUMBER PICTURE *9999 f , 

05 BUFFER_DATA CHARACTER (80), 

05 EOD_RRN PICTURE f 9999', 

05 RETURN_CODE PICTURE f S999»; 

DECLARE 

(INPUT_BUFFER, TEB, PF_KEY) 
BINARY FIXED (15); 

DECLARE 

(SETPAN, ACTION, FILEIO, MENU) ENTRY; 

DECLARE 

RETURN_CODE BINARY FIXED (15) STATIC; 

DECLARE ^ 

01 BUFFER STATIC, 

05 FIRST_80 CHARACTER (80), 

05 LAST_176 CHARACTER (176); 

DECLARE 

LIST_SCREEN CHARACTER (8) INITIAL ( f LST f ) STATIC; 

DECLARE 

01 FILE_CONTROL_AREA STATIC, 

05 REQUESTJTYPE CHARACTER (4), 

05 DATA_SET_NAME CHARACTER (8), 

05 NUMBER_OF_RECORDS BINARY FIXED (15) INITIAL (1), 

05 FILLER1 BINARY FIXED (15), 

05 EOD_RRN BINARY FIXED (15), 

05 FILLER2 BINARY FIXED (15), 

05 RELATIVE_RECORD_NUMBER BINARY FIXED (15), 

05 VOLUME NAME CHARACTER (6); 
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PL/I Sample Prog2 (continued) 

/* set up file control area. */ 
file_control_area.request_type = 

output_buffer.request_type; 
file_control_area.data_set_name = 

output_buffer.data_set_name; 
file_control_area.volume_name = 

output_buffer.volume_name; 
file_control_area.relative_record_number = 

output_buffer.relative_record_number; 
buffer. first_80 = output_buffer . buffer_data ; 

/* retrieve listing screen and abort if error. */ 
call setpan ( l ist_screen , return_code ) ; 
if return_code -= -1 
then call menu; 

/* perform file 10. */ 
call fileio (file control area, buffer, return code); 



•**\ 



/* MOVE DATA TO OUTPUT BUFFER SO IT WILL BE DISPLAYED. */ 
OUTPUT_BUFFER.DATA_SET_NAME = 

FILE_CONTROL_AREA.DATA_SET_NAME; 
OUTPUT_BUFFER.VOLUME_NAME = 

FILE_CONTROL_AREA.VOLUME_NAME; 
OUTPUT_BUFFER.REQUEST_TYPE = 

FILE_CONTROL_AREA.REQUEST_TYPE; 
OUTPUT_BUFFER.RELATIVE_RECORD_NUMBER 

= FILE_CONTROL_AREA.RELATIVE_RECORD_NUMBER; 
OUTPUT_BUFFER.BUFFER_DATA = BUFFER . F IRST_80 ; 
OUTPUT_BUFFER.EOD_RRN = F I LE_CONTROL_AREA . EOD_RRN ; 
OUTPUT BUFFER. RETURN CODE = RETURN CODE; 



/* DISPLAY SCREEN IMAGE. */ 
CALL ACTION; 

/* END PROGRAM. */ 
CALL MENU; 

END* 
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CHAPTER 6. REMOTE MANAGEMENT UTILITY 



The Event Driven Executive Remote Management Utility provides 
facilities for the management of a remote Series/1. The remote 
Series/1 is controlled by a host system. The utility waits for 
a request sent from the host* and then performs the particular 
function as specified by the request. Through implementation 
of this utility* the concept of distributed processing can be 
real i zed . 

This chapter describes these facilities and their operation* 
discusses the interface requirements* and provides information 
about the installation and execution of the Remote Management 
Uti li ty. 

The Remote Management Utility runs as a program in the remote 
Series/1 and supports such functions as file allocation and 
transfer, and remote operator interaction, thus minimizing the 
need for an operator at the remote Series/1. 

The remote Series/1 is controlled by the host system via a 
point-to-point or multipoint binary synchronous communication 
line using the Event Driven Executive Binary Synchronous Com- 
munication Access Method (BSCAM). 



Remote 
Ser i es/1 



Remote 
Management 
Uti lity 



/- 



Host 
System 



Host 
Program 



A user-written host program communicates with the Remote Man- 
agement Utility via a record exchange. Through this record 
exchange* the host requests function execution on the remote 
system. Any system supporting BSCAM-compat i b le binary synchro- 
nous line protocol including transparency mode* and the Remote 
Management Utility record exchange interface may serve as the 
host system . 



Chapter 6. Remote Management Utility 



205 



REMOTE MANAGEMENT FUNCTIONS 



The utility provides various remote management functions that 
can be invoked through a request issued by the host program. 
Listed here is a bri.ef description of the functions provided by 
the utility: 

ALLOCATE Allocate a disk/diskette data set on the Series/1 

DELETE Delete a disk/diskette data set on the Series/1 

DUMP Dump storage to a disk/diskette data set on the 
Ser i es/1 

EXEC Initiate execution of a program on the Series/1 

IDCHECK Verify identification between the host and the 
Remote Management Utility 

PASSTHRU Establish an interactive connection between the host 
and an application or utility on the remote Series/1 

RECEIVE Receive data from the host and write it to an 
existing disk /diskette data set on the Series/1 

SEND Read a disk/diskette data set on the Series/1 and 
transmit it to the host 

SHUTDOWN Terminate the Remote Management Utility and free up 
any allocated resources; may also initiate execution 
of another program 

WRAP Transmit a block of data just received back to the 
host 

The section "Remote Management Utility Functional Operation" 
on page 213 describes in detail these functions and how they 
operate . 



if \ 



206 SC34-0316 



o 



o 



HARDWARE REQUIREMENTS 

The Remote Management Utility requires approximately 7K bytes 
of storage plus buffer space. The default buffer space is 1024 
bytes. In addition, the following are the minimum require- 
ments ' 

• 4952, 4953, or 4955 processor (64K minimum recommended) 

• One of the following BSC features: 

Single-line adapter (#2074 or #2075) 

Multiline controller (#2093) and one or two , 4-line 
adapters (#2094) 

• Point-to-point (leased or switched) or multipoint (remote 
Series/1 as a tributary) binary synchronous communications 
1 i ne 

• Di sk or d i skette 

Disk (4962 or 4963) 
Diskette (4964 or 4966) 



SOFTWARE REQUIREMENTS 



The Remote Management Utility executes with Event Driven Exec- 
utive Version 2.0. The Event Driven Executive utilities are 
required for the installation of the Remote Management Utili- 
ty. A user-written program is required on the host to communi- 
cate with the Remote Management Utility. 



REMOTE MANAGEMENT UTILITY INTERFACE 



The Remote Management Utility requires a user-written host 
program that will provide inter-program communication between 
the host system and the remote Series/1. The Remote Management 
Utility interface is comprised of two levels of communication? 
the binary synchronous communication (BSC) protocol, and a 
Remote Management Utility record exchange between the host 
system and the remote Series/1. A feature of the record 
exchange interface provides data-record blocking operations. 
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Binary Synchronous Communication Protocol 



The Remote Management Utility uses the BSC protocol as defined 
by the Event Driven Executive BSCAM. A general introduction to 
binary synchronous communications and details of the line pro- 
tocol can be found in General Information — Binary Synchronous 



Communications , GA27-3004. Specific implementations 
with the Remote Management Utility are as follows*. 



of BSC 



_/ 



The utility sends EOT as "abort". The host program should 
also send EOT to abort. 

The utility will not time out when receiving data. The host 
program may send TTD, which will be responded to by NAK. 

EOT is sent whenever the utility expects a delay. The util- 
ity will not send TTD in the event of unforeseen delays. 

Transparent EBCDIC mode is used exclusively. The host must 
be capable of communicating with transparent EBCDIC. 

Point-to-point communications (leased or switched) or 
multipoint communications are supported. If multipoint 
communications are used, the utility functions as a 
tributary on the multipoint line. 



Record Exchange 



V y 



The second level of communication of the Remote Management 
Utility interface is that of a record exchange between the host 
and the remote Series/1. 

Records are transmitted between the host system and the remote 
Series/1 in a predefined format. As the content of the record 
determines the function to be performed* this predefined for- 
mat ensures that all necessary information is properly commu- 
nicated between the host system and the remote. The host is 
responsible for formatting records sent to the remote 
Series/1, and processing records received from the remote 
Series/1. After receiving a function request, the utility 
sends a record containing a status code to the host signaling 
the result of the function execution. 
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Record Format 



o 



Each Remote Management Utility record has 4 bytes at the begin- 
ning* that are referred to as the header. The first 2 bytes of 
+-u« u»-«^i n » #.»»4-^;» 4-u« ncr *. » n 4- •» n 1 P u-<>.>.^4-B^r ni c cty ->«/-i -» » „ 




The section at the end of this chapter, "CDRRM Equate Listing" 
on page 292 illustrates the various record types, including the 
extensions. This set of equates defining the Remote Management 
Utility record is obtainable through copy code "COPY CDRRM". 



Code 


Type 


Usage 


R 


Request 


Sent by host to request a func- 
t i on 


S 


Status 


Sent by either system to indi- 
cate success or failure of a 
f unct i on 


C 


Count 


Sent by the remote Series/1 
after transfer of a data set, to 
indicate the number of data 
records processed 


D 


Data 


Used for transfer of a data set 


P 


Passthru 


Used to pass data and data 
requests between the host and an 
application on the remote 
Ser i es/1 



Figure 13. Remote Management Utility Record Types 
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WRAP 
Request 






(7 other requests) 



4— b yte header 



1002 
(hex) 





DELETE 




ALLOCATE 
Request 










Status 
Record 








Count 
Record 








Data 
Record 





No Data 



Program End 



Request Data 



Text or PFK 



Passthr u 
Record 






Figure 14. Remote Management Utility Record Scheme 
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Record Blocking 



On data transfer oper at i ons ( SEND and RECEIVE), the Remote Man- 
agement Utility performs two types of record blocking* which 
are performed independently of one another, and thus, may be 
combined. A field in the SEND and RECEIVE record header dynam- 
ically determines the number of 80-byte or 256-byte records to 
be sent over the BSC line per transmission. In addition, if 
data sets are specified as containing 80-byte records (as in 
Event Driven Executive source files), the redundant 48 bytes 
per line of text are not transmitted. 

The following example illustrates a 256-byte record containing 
"text": 



80 bytes 
TEXT 


48 bytes 
(unused ) 


80 bytes 
TEXT 


48 bytes 
( unused ) 



The use of blocking will increase the efficiency with which the 
communications line is used. This is for two reasons: 



o 



Blocking decreases the amount of data transmitted. The 
4-byte header, along with other communications control 
information is sent only once per block. 

Blocking decreases the number of delays associated with 
each message sent over a communications line. 



Provided sufficient storage resources are available, it is 
advantageous to use large block sizes. However, the point 
occurs when, due to errors on the communications line, error 
recovery makes use of large blocks less efficient. 



Buffer Allocation 

The Remote Management Utility contains a constant that deter- 
mines the amount of storage to allocate for buffers. Records 
received by the utility may not exceed this buffer length. If a 
record is received greater than this length, a Status record 
indicating this condition (BSC I/O failure) is sent to the host 
and the function in progress (if any) is terminated. The 
default buffer size is IK (1024 bytes). The section "Modifying 
Defaults" on page 283 describes how this buffer size may be 
mod i f i ed . 
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Parameter Passing 



The EXEC, PASSTHRU, and SHUTDOWN functions of the Remote Man- 
agement Utility allow programs to be loaded for execution if 
specified on the request. Many programs require parameters to 
be passed to them in the form of a character field. An example 
of some of the programs requiring parameters are SEDXASM, 
SLINK, and SUPDATE, any of which may be specified on the 
request. The format of the parameter(s) to be passed is 
described in program preparation via the SJOBUTIL utility in 
Utilities, Operator Commands, Program Preparation) Messages 
and Codes . 

The parameter is coded for SJOBUTIL on the PARM statement in 
columns 10 through 72. To provide the equivalent information on 
the PASSTHRU request for example, you should code a parameter 
of 64 characters with the same content as columns 10 through 7 2 
of the PARM statement. The length of the parameter is 32 words. 

The following two examples illustrate how parameters would be 
passed to $EDXASM by way of the $J0BUTIL utility and the Remote 
Management Utility via a PASSTHRU request: 

$J0BUTIL statements: 

PROGRAM $EDXASM,ASMLIB 

PARM ERRORS * 

DS MYSRCMYVOL 

DS ASMWORK 

DS ASMOBJ 
EXEC 



PASSTHRU Request: 



RMHBSCC 


DATA 


X'1002' 


RMHID 


DATA 


C f X' 


RMHTYP 


DATA 


C T R" 


RMREQ 


DATA 


F f 12» 




DATA 


H'O* 


RMPRPTN 


DATA 


H f f 


RMPRPGM 


DATA 


CL8 f $EDXASM' 


RMPRVOL 


DATA 


CL6 ? ASMLIB' 


RMPRLFS 


DATA 


F'O' 


RMPRBLK 


DATA 


F f ? 


RMPRPRMt 


DATA 


F T 32' 


RMPRPRM 


DATA 


CL64 T ERRORS 


RMPRDSt 


DATA 


F f 3' 


RMPRDS 


DATA 


CL14'MYSRC 




DATA 


CL14*ASMW0RK ? 




DATA 


CLl^ASMOBJ 1 



MYVOL 






U-^ 



( 



.J 
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REMOTE MANAGEMENT UTILITY FUNCTIONAL OPERATION 




The examples in this section of the communications flow between 
the host and the remote Series/1 reflect the BSCAM level of 
access used by the host program and the utility. The DATA 
statements in these examples reflect code passed to the utility 
from the host program. The responses sent to the host from the 
utility are preceded by equal signs (=). Additional detail on 
the access method and BSC functions can be found in "Chapter 3. 
Binary Synchronous Communications" on page 35. 



o 



o 



Chapter 6. Remote Management Utility 213 



ALLOCATE Function 



The ALLOCATE function requests the utility 
disk/diskette data set on the remote Series/1. 



to allocate a 



The host sends the remote Series/1 a Request record with the 
ALLOCATE function specified. After receiving and executing the 
ALLOCATE request* the utility sends a Status record to the host 
indicating the results of the function execution. The utility 
then waits for a new request from the host. 

The ALLOCATE function uses the $DISKUT3 utility in performing 
its function. Thus, data sets with the names: $EDXNUC, 
$$EDXVOL, and $$EDXLIB may not be allocated with the ALLOCATE 
f unct i on . 



Required Field Descriptions 

Specify the following fields for the ALLOCATE function: 

RMHBSCC A 2-byte hexadecimal field containing the BSC control 
characters DLE STX, specified as X T 1002 ? . 

RMHID A 1-byte alphameric field containing the header ID 
1 X f , identifying the record as an Event Driven Execu- 
tive Remote Management Utility record. 

RMHTYP A 1-byte alphameric field identifying the header 
type. This field contains the character T R', specify- 
ing a Request record type. 

RMREQ A 2-byte numeric field specifying the request type. 
For an ALLOCATE request, this field contains the num- 
ber 2. 

RMADSN An 8-byte alphameric field containing the name of the 
data set to be allocated. 

RMAVOL A 6-byte alphameric field specifying the name of the 
volume on which the data set is to be allocated. If 
RMAVOL is blank, the volume name defaults to the IPL 
vol ume . 

RMANREC A 4-byte (double word) numeric field containing the 
number of 256-byte records to be allocated for the 
data set. Only the second word of this field is used. 



/4 T\ 



j 
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RMADST A 2-byte numeric field identifying the type of data 
set to be allocated. Specify one of the following 
types * 

User def i ned 

1 Data 

3 Program 

Figure 15 illustrates the host-remote interaction for the 
ALLOCATE function. In the example* the host requests a data set 
named "MYDATA" to be allocated on the volume "MYVOL". The data 
set type is 1 (data) and is to contain ten 256-byte records. The 
remote sends a status of -1 (successful) to the host, and the 
operation is completed. 






Host Program 

Write Initial - Request 



RMHBSCC 


DATA 


X 1 1002' 


RMHID 


DATA 


C f X* 


RMHTYP 


DATA 


C'R* 


RMREQ 


DATA 


F . 2 ' 


RMADSN 


DATA 


CL8»MYDATA' 


RMAVOL 


DATA 


CL6'MYVOL T 


RMANREC 


DATA 


D f 10' 


RMADST 


DATA 


FT 


Wr i te En 


d 





Host Remote 

ENQ > 

< ACK* 

TEXT > 



Read Initial - Status 

RMHTYP= f S' 

RMSREQ=2 

RMSFN=-1 

Read Continue - EOT 



< ACK* 

EOT > 

< ENQ 

ACK* > 

< TEXT 

ACK* > 

< E0T 



Figure 15. Communications Flow for the ALLOCATE Function 
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DELETE Function 



The DELETE function requests the utility to 
disk/diskette data set on the remote Series/1. 



delete 






J 



The host sends the remote Series/1 a Request record with the 
DELETE function specified. After receiving and executing the 
DELETE request* the utility sends a Status record to the host 
indicating the results of the function execution. The utility 
then waits for a new request from the host. 

The DELETE function uses the $DISKUT3 utility in performing its 
function. Thus, data sets with the names: $EDXNUC, $$EDXVOL, 
and $$EDXLIB may not be deleted with the DELETE function. 



Required Field Descriptions 



Specify the following fields for the DELETE function: 

RMHBSCC A 2-byte hexadecimal field containing the BSC control 
characters DLE STX, specified as X'tOOZ*. 



RMHID A 1-byte alphameric field containing the header ID 
'X 1 , identifying the record as an Event Driven Execu- 
tive Remote Management Utility record. 

RMHTYP A 1-byte alphameric field identifying the header 
type. This field contains the character 'R'» specify- 
ing a Request record type. 

RMREQ A 2-byte numeric field specifying the request type. 
For a DELETE request* this field contains the number 
3. 



V J 



RMDDSN An 8-byte alphameric field containing the name of the 
data set to be deleted. 

RMDVOL A 6-byte alphameric field specifying the name of the 
volume that contains the data set to be deleted. If 
RMDVOL is blank* the volume name defaults to the IPL 
vo 1 ume . 
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Figure 16 illustrates the host-remote interaction for the 
DELETE function. In the example, the host specifies a data set 
named "MYDATA" to be deleted from the volume "MYVOL". The 
remote sends a status of -1 (successful) to the host* and the 
operation is completed. 



^*\ 



Host Program 
Write Initial 



RMHBSCC 

RMHID 

RMHTYP 

RMREQ 

RMDDSN 

RMDVOL 



DATA 
DATA 
DATA 
DATA 
DATA 
DATA 



■ Request 

X T 1002 f 

C f X f 

C'R' 

F'3 1 

CL8 f MYDATA' 

CL6 T MYV0L T 



Host Remote 

ENQ > 

< ACK* 

TEXT > 



Write End 

Read Initial - Status 

RMHTYP='S» 

RMSREQ=3 

RMSFN=-1 

Read Continue - EOT 



< ACK* 

EOT > 

< ENQ 

ACK* > 

< TEXT 

ACK* > 

< E0T 



Figure 16. Communications Flow for the DELETE Functi 



on 
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DUMP Function 

\ J 
The DUMP function requests the utility to dump an Event Driven - 

Executive storage partition to a disk /diskette data set on the 

remote Ser i es/1 . 

The host sends the remote Series/1 a Request record with the 
DUMP function specified. After receiving and executing the 
DUMP request* the utility sends a Status record to the host 
indicating the results of the function execution. The utility 
then waits for a new request from the host. 



Required Field Descriptions 

Specify the following fields for the DUMP function? 

RMHBSCC A 2-byte hexadecimal field containing the BSC 
control characters DLE STX, specified as X f 1002 f . 

RMHID A 1-byte alphameric field containing the header ID 
'X'> identifying the record bs an Event Driven Exec- 
utive Remote Management Utility record. 

RMHTYP A 1-byte alphameric field identifying the header / \ 

type. This field contains the character ' R ' , speci- \. ^ 

fying a Request record type. 

RMREQ A 2-byte numeric field specifying the request type. 
For a DUMP request, this field contains the number 4. 

RMDPDSN An 8-byte alphameric field containing the name of a 
previously allocated data set into which the storage 
of the partition is to be dumped. 

RMDPVOL A 6-byte alphameric field specifying the name of the 
volume containing the dump data set. If RMDPVOL is 
blank, the volume name defaults to the IPL volume. 

filler A 1-byte reserved field (unused). 

RMDPPTN A 1-byte numeric field specifying the partition to 
be dumped. Specify one of the following: 

-1 Remote Management Utility partition 
1—8 Specific partition 
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Figure 17 illustrates the host-remote interaction for the DUMP 
function. In the example, the host requests that partition 1 be 
dumped to the data set "MYDATA" on the volume "MYVOL". The 
remote sends a status of -1 (successful) to the host, and the 
operation is completed. 



o 



Host Program 

Nrite Initial - Request 



RMHBSCC 


DATA 


X T 1002 T 


RMHID 


DATA 


C'X f 


RMHTYP 


DATA 


C'R' 


RMREQ 


DATA 


F f 4 f 


RMDPDSN 


DATA 


CL8'MYDATA' 


RMDPVOL 


DATA 


CL^'MYVOL' 




DATA 


H'0 T 


RMDPPTN 


DATA 


H f l f 



Host Remote 

ENQ > 

< ACK* 

TEXT > 



Wr i te End 

Read Initial - Status 

RMHTYP='S f 

RMSREQ=4 

RMSFN=-1 

Read Continue - EOT 



<- ACK* 

EOT > 

< ENQ 

ACK* > 

< TEXT 

ACK* > 

< EOT 



Figure 17. Communications Flow for the DUMP Function 
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EXEC Function 



The EXEC function requests the utility to load 
execution of a program on the remote Series/1. 



and invoke 



The hosts sends the remote Series/1 a Request record with the 
EXEC function specified. After receiving and executing the 
EXEC request, the utility sends a Status record to the host 
indicating the results of the function execution. The utility 
then waits for a new request from the host. 

If the program specified by the host requires a parameter and 
the parameter is not supplied, the load (via LOAD) of the pro- 
gram will fail. For further information on parameter passing, 
refer to the section "Parameter Passing" on page 212. 



,4 X 



Required Field Descriptions 

Specify the following fields for the EXEC function: 

RMHBSCC A 2-byte hexadecimal field containing the BSC control 
characters DLE STX, specified as X'1002 f . 

RMHID A 1-byte alphameric field containing the header ID 
'X', identifying the record as an Event Driven Execu- 
tive Remote Management Utility record. 

RMHTYP A 1-byte alphameric field identifying the header 
type. This field contains the character 'R f , specify- 
ing a Request record type. 

RMREQ A 2-byte numeric field specifying the request type. 
For an EXEC request, this field contains the number 9. 

filler A 2-byte reserved field (unused). 

RMXFLG A 1-byte numeric field containing the RMXFLGL and 
RMXFLGW bits. RMXFLGL and RMXFLGW correspond to the 
usage of the LOGMSG and WAIT parameters of the Event 
Driven Language LOAD instruction. 

RMXFLGL - When set on, this bit indicates that a "pro- 
gram loaded" message is to be printed on the terminal 
which loaded the utility. The value for RMXFLGL when 
set on is X»40' . 



V 
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RMXFLGW - When set on, this bit indicates that the 
utility is to wait for the completion of the program 
before sending a Status record to the host. Other- 
wise, the program executes asynchronously with the 
utility, and the utility sends a Status record after 
invoking the LOAD instruction. If the utility waits 
for the completion of the program, the PROGSTOP code 
from the program is returned in the RMSST field of the 
Status record. The value for RMXFLGW when set on is 
X T 20 f . 



RMXPTN A 1-byte numeric field specifying the partition the 
program is to run in. Specify one of the following! 

-1 Remote Management Utility partition 
Any part i t i on 
1—8 Specific partition 



o 



RMXPGM 



RMXVOL 



RMXLFS 



RMXPRM# 



An 8-byte alphameric field specifying the program to 
be executed . 

A 6-byte alphameric field specifying the name of the 
volume which contains the program. If RMXVOL is 
blank, the volume name defaults to the IPL volui 



ime 



A 2-byte numeric field specifying the amount of free 
space (in bytes) to pass to the program. 

A 2-byte numeric field specifying the length of the 
parameter ( s ) , in words, to pass to the program. This 
field must be zero if no parameters are passed. 



RMXPRM A variable length field containing the parameter(s) 
to be passed to the program. The length of this field, 
in words, must correspond to the value contained in 
the RMXPRMf field. See the section "Parameter 
Passing" on page 212 for details on this field. 

RMXDSt A 2-byte numeric field specifying the number of data 
set names to pass to program. The maximum number of 
data sets that may be specified is nine. This field 
must be zero if no data set names are passed. 

RMXDS A variable number of 14-byte alphameric fields 
specifying the data set and volume names to be passed 
to the program. The first eight bytes contain the data 
set name, and the last six bytes contain the volume 
name. If the volume name is blank, the name of the 
volume defaults to the IPL volume. The number of data 
set and volume names specified must correspond to the 
value contained in the RMXD5# field. 
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Figure 18 illustrates the host-remote interaction for the EXEC 
function. In the example* the host specifies a program named 
"MYPROG" on the volume "MYVOL", is to be executed in partition 
1 with 256 bytes of free space passed to the program. The RMXFLG 
field specifies that both RMXFLGL and RMXFLGW bits are set on. 
No parameters or data sets are passed to "MYPROG". The program 
ends with a return code of -1. The remote sends a status of -1 
(successful) to the host, along with the return code and the 
operation is completed. 






Host Program 

Write Initial - Request 

RMHBSCC DATA X'1002' 



Host Remote 

ENQ > 

< ACK* 

TEXT > 



RMHID 


DATA 


C'X f 


RMHTYP 


DATA 


C'R' 


RMREQ 


DATA 


F*9' 




DATA 


F f 0' 


RMXFLG 


DATA 


X'60 T 


RMXPTN 


DATA 


H'l • 


RMXPGM 


DATA 


CL8 f MYPR0G' 


RMXVOL 


DATA 


CL6 'MYVOL' 


RMXLFS 


DATA 


F'256' 


RMXPRMt 


DATA 


F f f 


RMXPRM 


EQU 


x 


RMSDSt 


DATA 


F»0 T 


RMSDS 


EQU 


* 


Write En 


d 





Read Initial - Status 

RMHTYP='S T 
RMSREQ=9 
RMSFN=-1 
RMSST=-1 



< ACK * 

EOT > 

< ENQ 

ACK* > 

< TEXT 



Read Cont i nue 



EOT 



ACK* 



EOT 



V...,y 



Figure 18. Communications Flow for the EXEC Function 



222 SC34-0316 






O 



IDCHECK Function 



The IDCHECK function allows the host and the remote system to 
verify each others identification. 

The host sends the remote Series/1 a Request record with the 
IDCHECK function and the host ID specified. The utility com- 
pares this ID with a constant defined in the utility as the host 
ID. If the IDs match, the utility returns a Status record which 
contains the ID of the remote system, which is another con- 
stant. If the IDs do not match, an error status is returned to 
the host and the ID of the remote Series/1 is not returned. In 
either case, after the Status record is sent to the host, the 
utility then waits for a new request from the host. 

The default host ID for the host system is "HOSTRMUX", and 
"REMTRMUX" is the default ID of the remote system. 



Required Field Descriptions 



Specify the following fields for the IDCHECK function: 

RMHBSCC A 2-byte hexadecimal field containing the BSC control 
characters DLE STX, specified as X'1002 T . 

RMHID A 1-byte alphameric field containing the header ID 
'X', identifying the record as an Event Driven Execu- 
tive Remote Management Utility record. 

RMHTYP A 1-byte alphameric field identifying the header 
type. This field contains the character f R', specify- 
ing a Request record type. 

RMREQ A 2-byte numeric field specifying the request type. 
For an IDCHECK request, this field contains the num- 
ber 6 . 

RMICHK An 8-byte alphameric field specifying the host ID. 
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Figure 19 illustrates the host-remote interaction for the 
IDCHECK function. In the example* the host specifies the ID 
"HOSTRMUX". The remote validates the host ID , sends a status 
of -1 (successful) to the host along with the remote system's 
ID, "REMTRMUX", thus completing the operation. 



Host Program 

Write Initial - Request 

RMHBSCC DATA X f 1002 f 

RMHID DATA C f X f 

RMHTYP DATA C T R f 

RMREQ DATA F f 6 f 

RMICHK DATA C f HOSTRMUX f 

Wr i te End 

Read Initial - Status 

RMHTYP= , S" 
RMSREQ=6 
RMSFN=-1 
RMSRID= , REMTRMUX f 

Read Continue - EOT 



Host Remote 

ENQ > 

< ACK* 

TEXT > 



EOT 



ACK* 



ACK* 



ENQ 



TEXT 



ACK* > 

< — EOT 



V 



Figure 19. Communications Flow for the IDCHECK Function 
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PASSTHRU Function 

The PASSTHRU function provides the host with an interface which 
simulates the capabilities of a terminal connected to a 
Series/1. Through this interface* the host can interact with 
the Event Driven Executive supervisor by issuing operator com- 
mands* or by interacting with a program as if that program was 
loaded from a terminal on the Series/1. The host's interaction 
with the supervisor or a program is conducted in a PASSTHRU 
sess i on . 

Most programs which do not require full screen terminal sup- 
port* including most Event Driven Executive utilities may be 
used with the PASSTHRU function. Characteristics of programs 
which prevent programs from running under the PASSTHRU func- 
tion are discussed in the section "Considerations on Using 
PASSTHRU" on page 237. 

An example of the use of PASSTHRU could be a host program that 
formats a host terminal to look like a remote Series/1 termi- 
nal. The operator on the host system could then interact with 
the program as if the terminal was on the remote Series/1. 

The PASSTHRU function is initiated by the host sending a 
PASSTHRU request to the utility. After the request is sent, a 
series of records are exchanged between the host and the utili- 
ty* similar to the way messages are written to and read from a 
terminal. This procedure will be discussed in two parts: 

• Establishing a PASSTHRU Session 

• Conducting a PASSTHRU session 



Establishing a PASSTHRU Session 

As was previously discussed, a PASSTHRU function is initiated 
by the host sending a PASSTHRU request to the utility. The ses- 
sion is established after the host receives a successful Status 
record and an EOT. The PASSTHRU request may specify (RMPRPGM 
field) one of two ways of establishing a session: 

• Communication with the Event Driven Executive supervisor 

• Communication with a program which the utility will load 
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If a session with the supervisor is established, the utility 
will issue an "attention" (as if the attention key on the ter- 
minal was pressed). Following the attention, the PASSTHRU ses- 
sion will be conducted with the terminal on the host receiving 
the caret symbol (>), and continued by the operator entering an 
operator command, for example $L. 

If a session with a program is established, the host specifies 
the name of the program and the program is loaded by the utili- 
ty. The PASSTHRU session will be conducted with the host inter- 
acting with the program. 

The following fields must be specified on the PASSTHRU request 
to establish a PASSTHRU session: 



A 



X 



RMHBSCC A 2-byte hexadecimal field containing the BSC control 
characters DLE STX, specified as X r 1002'. 

RMHID A 1-byte alphameric field containing the header ID 
'X', identifying the record as an Event Driven Execu- 
tive Remote Management Utility record. 

RMHTYP A 1-byte alphameric field identifying the header 
type. This field contains the character ' R ' , specify- 
ing a Request record type. 

RMREQ A 2-byte numeric field specifying the request type. 
For a PASSTHRU request, this field contains the num- 
ber 12. 

RMPRBLK A 2-byte numeric field indicating whether the host is 
to receive blocked records from the remote. A value of 
specifies that records are unblocked. A value 
greater than specifies the size, in bytes, of the 
record block (size of "Text or PF Key" extension after 
the RMPTYP field). See the section "PASSTHRU 
Blocking" on page 237 for details on this field. 

RMPRFLG A 1-byte reserved field (unused). 

RMPRPTN A 1-byte numeric field specifying the partition the 
program is to run in. Specify one of the following: 

-1 Remote Management Utility partition 
Any part i t i on 
1—8 Specific partition 

RMPRPGM An 8-byte alphameric field specifying the name of the 
program or utility to interact with the host. If this 
field is blank, a session with the Event Driven Execu- 
tive is established. 

RMPRVOL A 6-byte alphameric field specifying the name of the 
volume which contains the program or utility. If 
blank, the name defaults to the IPL volume name. 
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RMPRLFS A 2-byte numeric field specifying the amount of free 
space (in bytes) to pass to the program. 

RMPRPRM* A 2-byte numeric field specifying the length of the 
parameter(s), in words, to pass to the program. This 
field must be zero if no parameters are passed. 



RMPRPRM A variable length field containing the parameter(s) 
to be passed to the program. The length of this field, 
in words, must correspond to the value contained in 
the RMPRPRM* field. See the section "Parameter 
Passing" on page 212 for details on this field. 

RMPRDS* A 2-byte numeric field specifying the length of data 
sets to pass to the program. The maximum number of 
data sets that may be specified is nine. This field 
must be zero if no data sets are passed. 



RMPRDS A variable number of 14-byte alphameric fields 
specifying the data set and volume names to be passed 
to the program. The first eight bytes contain the data 
set name, and the last six bytes contain the volume 
name. If the volume name is blank, the name of the 
volume defaults to the IPL volume. The number of data 
set and volume names specified must correspond to the 
value contained in the RMPRDS# field. 

Figure 22 on page 241 illustrates the host-remote interaction 
in establishing a PASSTHRU session. 



Conducting a PASSTHRU Session 



Once the PASSTHRU session is established, the session is 
conducted with Passthru type records exchanged between the 
host and the remote Series/1. The Passthru records provide 
information to and receive information from the host program, 
as if the host program were a terminal on the remote Series/1. 
Four Passthru records are defined to provide this information. 
These records are described as follows? 

• Text or Program Function (PF) Key - Passthru record which 
passes messages or program function keys. 

• Request for Data - Passthru record which indicates data 
should be sent. 

• Program End - Passthru record which indicates termination. 



No Data - Passthru record which indicates no messages are 
are available. 
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The content and format of these records is discussed 
section "Passthru Record Types" on page 232. 



in the 



<f ^ 



Figure 20 on page 230 graphically illustrates how a PASSTHRU 
session is conducted. In this illustration, each vertical line 
represents a "state" the host may be in at any time during the 
session. The name attached at the top of each vertical line is 
the name of the state. The state of the host may change by one 
of the f ol lowi ng : 

• Receiving a Passthru record from the utility. This is 
represented by a solid horizontal line with an arrow point- 
ing to the new state. 

• Sending a Passthru record to the utility. This is repres- 
ented by a horizontal line of dashes with an arrow pointing 
to the new state . 

• A change of state with no Passthru record transfer. This is 
represented by a dotted line with an arrow pointing to the 
new state . 

The PASSTHRU session begins with the host in the state 
"READTEXT" as shown in the figure. The host issues a "read" to 
the communications line and will receive either a "Text or PF 
Key", "Request for Data", or "Program End" record. The type of 
record the host receives is determined by the terminal activity 
occurring in the remote Series/1. 

If the host receives a Text or PF Key record, data is being sent 
to the host. The program (or the supervisor) has issued a 
PRINTEXT or other terminal I/O instruction, and the message is 
transmitted to the host as if the host were a terminal. As shown 
in the figure, the state of the host changes from "READTEXT" to 
"READING" because the host received a Text or PF Key record. 
The state then changes back to "READTEXT". Effectively the host 
remains in the "READTEXT" state as long as Text or PF Key 
records are received. 

If the host receives a Request for Data record, data is needed 
from the host. The program (or the supervisor) has issued a 
READTEXT or other terminal I/O instruction, and requires data 
from the host as if the host were a terminal. As shown in the 
figure, the state of the host changes from "READTEXT" to "PGM 
NEEDS DATA". Note that an EOT follows the the Request for Data 
record. The host must read the EOT also. 

In the host's current state, "PGM NEEDS DATA", the host must 
send a Text or PF Key record followed by an EOT. The Text or PF 
Key record the host sends may contain either text or a PF key 
(the host, as a terminal, has entered text or a program func- 
tion key in response to Request for Data). 



v 
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If the host sends text, the state of the host changes from "PGM 
NEEDS DATA" back to "READTEXT". If the host sends a program 
function key, the host goes to the state "PFK SENT". The host 
issues a read to the communications line and will receive a 
Request for Data record followed by an EOT. This Request for 
Data is sent to the host because the original request was not 
satisfied by the program function key. As a result, the host is 
now in the state "SEND TEXT". The host must send a Text or PF 
Key record which contains text* followed by an EOT. The host is 
then back to the state "READTEXT". 

The last possibility from the state "READTEXT" is that the host 
will receive a Program End record* followed by an EOT. This 
indicates either the program, the operator command, or an 
attention exit has completed. The host changes from the state 
"READTEXT" to "CONTINUE ?". At this point, the host must deter- 
mine whether the PASSTHRU session should continue. 

If the PASSTHRU session was with a program and the program has 
ended (while in the "CONTINUE ?" state), the host would most 
likely decide not to continue. If the session was with the 
supervisor and a $L command was successfully entered, the host 
would most likely decide to continue the session and communi- 
cate with the program which was loaded. 

To terminate the PASSTHRU session, the host sends a Program End 
record, followed by an EOT. This changes the state of the host 
from "CONTINUE ?" to "EXIT". The PASSTHRU session is now termi- 
nated and the Remote Management Utility will wait for a new 
request from the host. To continue the session, the host should 
send a Request for Data record followed by an EOT. The state of 
the host then changes from "CONTINUE ?" to "ACTIVITY ?". 

At this point, the utility determines if there is any terminal 
activity on the remote Series/1 for the host. If there is 
activity, one of the three Passthru records which can be 
received from the "READTEXT" state will be received by the 
host. These three records are Text or PF Key, Request for Data, 
or Program End. The state of the host will change as it would 
from the state "READTEXT". 

If there is no terminal activity, the host will receive a No 
Data record followed by an EOT, and the host's state changes 
from "ACTIVITY ?" to "CONTINUE ?". The host may then determine 
again whether it should continue. If the program in the remote 
Series/1 has any delays in performing terminal I/O while the 
host is in the "CONTINUE ?" state, the host may change from 
"CONTINUE ?" to "ACTIVITY ?" and back again several times. How- 
ever, if no activity ever occurs, the host must eventually send 
a Program End record and terminate the PASSTHRU session. 
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READTEXT 



READING 



Recv "Text or PFK" 



->- 



-< 



Uti lity to Host 
Host to Utility 
Change of State 
(no record transfer) 



PGM NEEDS 
DATA 



Recv "Req Data" & EOT 



•>- 



-< 



Text & 
Send "Text or PFK" - EOT 



PFK 
SENT 



PF Key 
Send "Text or PFK" - & EOT 



>- 



SEND 
TEXT 



Text & 
Send "Text or PFK" - EOT 



Recv "Req Data" & EOT 



<- 



CONTINUE 



Recv "Pgm End" & EOT 



Send "Pgm End" & EOT 




ACTIVITY 



Send "Req Data" & EOT 



Recv "No Data" & EOT 



x NO 
ACTV 



< x ACTV 

Figure 20. Logic Flow of a PASSTHRU Session 
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The preceding discussion and Figure 20 on page 230 summarizes 
the flow of a PASSTHRU session. The only addition to this is 
that of a severe error being encountered* in which case the 
host may receive or send a Status record followed by an EOT. An 
example of where this error condition could occur is if the 
host sends an invalid Passthru record. The utility will respond 
to this invalid record with a Status record. Similarly* the 
host may send a 4-byte Status record (preceded by "abort" if 
necessary). In either case* the PASSTHRU session is terminated 
and the utility will wait for a new request. 



The following is the format of the Status record sent by the 
host: 



RMHBSCC 

RMHID 

RMHTYP 



DATA 
DATA 
DATA 



X T 1002 f 

C'X' 

C'S' 
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Passthru Record Types 



This section describes in detail the format and content of the 
four types of Passthru records previously mentioned. 



Text or Program Function Kev 



This record is comprised of two segments. The first six bytes, 
or the main segment, identifies this record as a Passthru Text 
or Program Function (PF) Key record. Following the main segment 
is one or more text or PF key segments. The following is an 
illustration of these two segments: 



Main segment: 



RMHBSCC 


DATA 


X' 1002' 


RMHID 


DATA 


C f X* 


RMHTYP 


DATA 


C f P f 


RMPTYP 


DATA 


F'l' 



Text or program function key segment: 



RMPST 


DATA 


F 'nnnn • 


RMPTXTL 


DATA 


F " nnnn ' 


RMPTXT 


DATA 


C'xxxx' 



In the main segment, all values are constants as shown. The 
text or program function key segment contains the information 
to be transferred: 

RMPST A 2-byte value of the return code. This field 
contains a value only on records received by the 
host . 

RMPTXTL A 2-byte numeric field specifying either the length 
of the text, or indicating a PF key is being sent. 

RMPTXT Either a variable-length alphameric field 
containing text, or a 2-byte numeric field contain- 
ing the PF key value. 

If the Text or PF Key record is not blocked, it will contain one 
of each segment. If the record is blocked, it will contain one 
main segment followed by more than one text or program function 
key segments. All records sent by the host are unblocked. 
Records received by the host may be blocked if specified on the 
PASSTHRU request. Details on how to specify blocking is dis- 
cussed in the section "PASSTHRU Blocking" on page 237. 
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Nhen the host sends a Text or PF Key record* the record may con- 
tain either text (the host as a terminal has entered text), or a 
PF key (the host as a terminal has entered a program function 
key). If text is sent, the length of the text is specified in 
the RMPTXTL field, and the text is specified in the RMPTXT 
field. The RMPST field is not used. 



The following example illustrates a record sent by 
which contains the text "MESSAGE FROM HOST PROGRAM": 



the host 



Text record sent by the host: 



RMHBSCC 

RMHID 

RMHTYP 

RMPTYP 

RMPST 

RMPTXTL 

RMPTXT 



DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 



X' 1002 1 

C'X 1 

C'P T 

F f l f 

F'0 f 

F f 25' 

C T MESSAGE 



(IGNORED) 



FROM HOST PROGRAM' 



When the host sends a program function key, the value of the 
RMPTXTL field is set to -1 and the program function key is spec- 
ified as a 2-byte numeric value in the RMPTXT field. A PF key 
value of is the equivalent of an "attention". 



The following example illustrates 
being sent by the host: 



a program function key 3 



rogr am f \ 


jnct i on 


key record sent b 


RMHBSCC 


DATA 


X f 1002 


i 


RMHID 


DATA 


C'X f 




RMHTYP 


DATA 


C'P f 




RMPTYP 


DATA 


F'l f 




RMPST 


DATA 


F'0 f 


(IGNORED) 


RMPTXTL 


DATA 


F'-l » 


(INDICATES 


RMPPF 


DATA 


F» 3 T 


PF KEY 3 



host : 



PF KEY) 



All Text or PF Key records received by the host will always con- 
tain text; the host will never receive a program function key. 
Each Text or PF Key record begins with the 6-byte main segment 
followed by one or more text segments. The fields in each text 
segment are defined as follows: 






RMPST A 2-byte numeric containing the return code 
associated with the text. For example, the return 
code indicates whether the text is to appear on a new 
line. Some return codes have no text associated with 
them. For a complete description of the possible 
return codes, refer to virtual terminal communi- 
cations return codes as described for the READTFXT 
instruction in the Language Reference . 
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The return codes which are applicable are: 
X T 8Fnn f LINE=nn received 



X»8Enn T 



-2 



SKIP=nn received 



Line received (no CR) 



-1 



New 1 i ne rece i ved 



RMPTXTL A 2-byte numeric field containing the text length. 
If there is no text* this field will contain the val- 
ue . 

RMPTXT A variable-length alphameric field containing the 
text received by the host. The length of this field* 
in bytes, is the value of RMPTXTL. If RMPTXTL is an 
odd number, one byte of blanks (X f 40 f ) follows the 
text. 

If records are blocked, multiple text segments are received on 
a Text or PF Key record. The host must determine the length of 
the record in order to process each segment. Figure 21 on page 
235 is an example of the records the host receives from a pro- 
gram which executes a PRINTEXT instruction. 



v__y 



234 SC34-0316 



o 



•N 



Issued by program on remote Series/1: 
PRINTEXT 'ENTER COMMAND ' , SK I P= 1 



Passthru record received by host 
with no block i ng : 



RMHBSCC 


DATA 


X'1002' 




RMHID 


DATA 


CX 1 




RMHTYP 


DATA 


C'P' 




RMPTYP 


DATA 


F'l ' 




RMPST 


DATA 


X'8E01' 


(SKIP=1) 


RMPTXTL 


DATA 


F'C 


(NO TEXT) 


RMHBSCC 


DATA 


X'1002' 




RMHID 


DATA 


CX' 




RMHTYP 


DATA 


C'P 1 




RMPTYP 


DATA 


F'l' 




RMPST 


DATA 


F'-2» 




RMPTXTL 


DATA 


F f 13' 




RMPTXT 


DATA 


CENTER 


COMMAND' 




DATA 


C 1 ' 


(PAD) 



Passthru record received by host 
with block i ng : 

RMHBSCC DATA X'1002' 



RMHID 


DATA 


C'X' 




RMHTYP 


DATA 


C'P' 




RMPTYP 


DATA 


F' 1' 






DATA 


X'8E01' 


(SKIP=1) 




DATA 


F'O' 


(NO TEXT) 




DATA 


F'-2' 


(NEXT SEGMENT) 




DATA 


F'13 1 






DATA 


CENTER 


COMMAND' 




DATA 


C f 


(PAD) 



Figure 21. Example of Passthru Records Received by Host 



Chapter 6. Remote Management Utility 



235 



Request for Data 



The Request for Data record is a 6-byte record which contains 
constant values. A Request for Data record is always followed 
by an EOT. 



/f \ 



The following is the format of the Request for Data record: 

RMHBSCC DATA X f 1002 f 

RMHID DATA C'X* 

RMHTYP DATA C f P» 

RMPTYP DATA F f 2 f 



Program End 



The Program End record is a 6-byte record which contains con- 
stant values. A Program End record is always followed by an 
EOT. 

The following is the format of the Program End record: 



RMHBSCC DATA X T 1002* 

RMHID DATA C'X 1 

RMHTYP DATA C'P' 

RMPTYP DATA F'3' 



h. y 



No Data 



The No Data record is a 6-byte record which contains constant 
values. A No Data record is always followed by an EOT. 

The following is the format of the No Data record: 

RMHBSCC DATA X'1002' 

RMHID DATA C T X' 

RMHTYP DATA C'P' 

RMPTYP DATA F T 4 f 
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PASSTHRU Blocking 



When Passthru records are blocked, the communications line is 
used more efficiently. Nithout blocking, each Text or PF Key 
record contains only one text segment. With blocking, each 
record may contain multiple text segments. Through use of 
blocking, the amount of information and the number of records 
transmitted over the communications line is reduced. Thus 
blocking allows more efficient usage of the communications 
line, especially for PASSTHRU sessions in which the host 
receives many consecutive lines of output, such as a result of 
a "list" command to a utility. 

To use PASSTHRU blocking, the host must determine the length of 
the Text or PF Key record and process each text segment until 
the end of the record is reached. 



(J 



The host specifies blocking on the PASSTHRU request in the 
RMPRBLK field. If this field is set to zero blocking is not per- 
formed. A value greater than zero indicates the maximum length 
of the text segments which the host can process. To determine 
the value for the RMPRBLK field, start with the size of the 
buffer at the host. Subtract 6 from the size of the host buffer 
for the 6-byte main segment of each record. Then subtract 2 
more to allow space for the ETX plus one byte for word align- 
ment. The resulting number is the maximum blocking size the 
host may use. This number would then be specified in the 
RMPRBLK field of the PASSTHRU request. The utility will use 
this value if it can. If, however, the utility does not have a 
buffer of sufficient size to provide records of the size 
requested, the utility will block to the largest size it can 
handle. Refer to the section "Modifying Defaults" on page 283 
for additional information on the maximum blocking size of the 
utility. 



If a single text record should exceed the size specified for 
RMPRBLK, the utility will send that record to the host. This 
may result in a "wrong length record" condition; the host 
should ensure that it can handle the longest length record 
expected from the utility. For example, if the longest text 
length is 132 bytes, a minimum block size of 136 would be suffi- 
cient for all records. 



Considerations on Using PASSTHRU 



As mentioned earlier, most programs can be used with the 
PASSTHRU function of the Remote Management Utility. In this 
section, considerations on the use of the PASSTHRU function are 
discussed. These include a discussion of restrictions on the 
use of the PASSTHRU function and programming techniques. 
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The PASSTHRU function uses the virtual terminal support of the 
Event Driven Executive, and therefore has any restrictions 
inherent in this support. The primary one is that static 
screens are not supported, therefore programs requiring static 
screens can not be run under the PASSTHRU function. This 
includes such programs as the full screen editor, $ F S E D I T . 
Another restriction is that message length may be no longer 
than 254 bytes . 






The utility allows the host to transmit a program function key 
or an attention only when the remote is already requesting 
data. Therefore output from the remote may not be "interrupted" 
by an "attention", as it could be on a local terminal. For exam- 
ple, a listing produced by the SDISKUT2 utility could not be 
interrupted by an "attention" and cancel command. 

If a program stops communicating with the terminal which loaded 
it, and waits on the terminal to enter commands by way of "at- 
tention" or program function keys, it will not run directly 
under the PASSTHRU function. This occurs because the Remote 
Management Utility will wait indefinitely on a "READTEXT" to 
the virtual channel while the remote program is waiting on an 
attention or PF key. When this happens, this is referred to as a 
deadlock situation. Programs which do this include the follow- 
i ng : 



$DEBUG 

STRAP 

$LOG 

$BSCTRCE 

$TERMUT3 

$IOTEST 

CALCDEMO 



(Attention-entered commands) 
(Attention-entered commands) 
( Sample program ) 



V. 



._ s 



A program has been provided which will break the deadlock situ- 
ation when it occurs. The program name is SRMUPA. It must be 
started under the PASSTHRU function prior to starting a 
PASSTHRU session with one of the programs which may have this 
problem. $ R M U P A will cause a "disconnect", resulting in a Pro- 
gram End Passthru record being received at the host whenever 
the following sequence of events occurs: 

1. No activity has occurred over the virtual channel for 20 
seconds . 



2 . The utility is 
i nstr uct i on . 



waiting on completion of a "READTEXT" 



3. The remote program is not ENQT'ed on its virtual terminal. 

The program uses the STIMER instruction, and therefore 
requires timer support to be included in the remote system. 
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Due to a timing situation when multiple programs are communi- 
cating over a virtual channel* blocking must be used while run- 
ning these programs. 

The sample PASSTHRU host program in the section "Sample Host 
Programs" on page 259 illustrates how to use the program 5RMUPA 
from a host program. $RMUPA is first started under the PASSTHRU 
function. When a Program End Passthru record is received at the 
host* the host responds with a Program End Passthru record and 
the PASSTHRU session with $RMUPA is terminated. Only one copy 
of $RMUPA should be running at a time. It' may run in any parti- 
tion. It continues running until an "attention" followed by 
"SRMUPA" is entered. 

Once $RMUPA is running* another program may be started. The 
sample PASSTHRU host program interaction in the section 
"Sample Host Programs" on page 259 illustrates how $DEBUG may 
be used. Note that "$PF0" is entered to provide the same func- 
tion as entering the "attention" key. 

If a remote program should take longer than 20 seconds between 
performing terminal I/O, $RMUPA will cause a Program End record 
to be sent even though the program is still running. If this 
happens, the host should respond with a Request for Data record 
until the remote program performs terminal I/O. 

If a program is run under the PASSTHRU function which issues an 
ENQT instruction for a terminal other than the terminal which 
loaded the program and the program terminates, the utility does 
not receive a "disconnect" over the virtual channel and the 
host will not receive a Program End record. The utility will 
wait indefinitely. One example of where this will occur is in 
running $EDXASM, with output directed to a printer. This condi- 
tion can be avoided in two ways? 

• Load the program from another program (such as the $J0BUTIL 
utility) which will wait on the program to complete. 

• Load the program through a session with the Event Driven 
Executive via a $ L command and respond with a Program End 
when the command terminates. Programs requiring terminal 
interaction after being loaded, such as $EDXASM, will not 
work in this manner, so should be handled in the first way. 






When multiple programs are communicating over a virtual chan- 
nel, blocking must be used. As mentioned previously, this is 
due to a timing situation with multiple programs. 

Only one PASSTHRU session may be conducted at a time, since the 
utility uses a predefined set of virtual terminals, CDRVTA and 
CDRVTB. While a PASSTHRU session is being conducted, another 
copy of the utility (defined for another communications line) 
may be performing any other function except PASSTHRU. 
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In the event a PASSTHRU session is abruptly terminated (status 
received from host* invalid message received from host, or an 
error in the BSC) , the utility will cause a terminal I/O return 
code 5 ("Disconnected") to be received by the program for the 
outstanding terminal request. This code will only be received 
once by the PASSTHRU- i nvoked program, and the program should 
then take appropriate action, which would most likely be to 
terminate. However, if the program does not recognize the ter- 
minal error and continues to perform terminal I/O, the program 
will interfere with attempts to establish a new PASSTHRU ses- 
sion. If the new session is being established with a program, 
the utility will return the status "virtual terminal busy". The 
host may establish a session with the Event Driven Executive 
and issue a $C command to cancel the suspended program. The $C 
command should be used with caution, as noted in the Utilities, 
Operator Commands, Program Preparation, Messages and Codes . 

When a $L command is issued during a PASSTHRU session with the 
Event Driven Executive supervisor, a Program End Passthru 
record, resulting from completion of the command, may be 
received by the host. Whether it is received depends on how 
quickly the loaded program begins performing terminal I/O. 

As described in the System Guide , two virtual terminals, named 
CDRVTA and CDRVTB, must be defined for using the PASSTHRU func- 
tion. Also, virtual terminal support must be included at system 
generation time. Refer to the System Gu i de for details. 

The utility will not time-out while it is receiving messages 
during a PASSTHRU session. However, if the host does not 
acknowledge reception of messages sent by the utility, a 
time-out will occur and the PASSTHRU session is terminated. 
This can be avoided in two ways: 

• Avoid any long delays at the host while messages are being 
received from the remote Series/1. 

• Define a high retry count for the RETRIES parameter of the 
BSCLINE statement in the remote system. 

Figure 2 2 on page 241 illustrates the host-remote interaction 
for the PASSTHRU function. In the example, the host specifies 
the program "MYPROG" on the volume "MYVOL" is to be executed. 
While executing, the program writes one message to the virtual 
terminal via a Passthru record, receives one message from the 
virtual terminal via a Passthru record, and terminates. 
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RECEIVE Function 



The RECEIVE function requests the utility to receive a data set 
transmitted from the host and to write it to a disk /diskette 
data set on the remote Series/1. 

The host can specify it is sending a data set consisting of 
256 -byte data records* or a source data set* consisting of 
80-byte text records. The host may also specify blocking, in 
which case, the utility receives records containing multiples 
of 256-byte or 80-byte records. 

The host sends the remote Series/1 a Request record with the 
RECEIVE function specified. After receiving and executing the 
RECEIVE request, the utility checks to see if it can handle 
records of the size requested and attempts to open the data 
set. The utility then sends a Status record to the host. If a -1 
(successful) status is returned to the host the RECEIVE func- 
tion continues, otherwise the function is terminated. 

Upon receipt of the successful status, the host sends Data 
records to the utility. The data contained within the Data 
records sent by the host should have a length which is a multi- 
ple of 256 or 80, depending on the data set type. If the utility 
receives a record whose length is not a multiple of 256 or 80 
(short record), the record is padded with zeroes, and then 
written to disk or diskette. For example, assume that a 
256-byte record data set with a blocking factor of 3 is speci- 
fied. A record received with with a length of 256 will cause one 
record to be written. A record received with a length of 512 
will cause two records to be written, and similarly, a length 
of 768 will cause three records to be written, all with no pad- 
ding. However, a record received with a length of 300 would 
cause two records to be written. The first containing the first 
256 bytes of data, and the second containing the last 44 bytes 
of data followed by 212 zeroes (X T 00 ? ), thus padding it to a 
length of 256 bytes. 

If the utility receives a Data record whose length is greater 
than the length specified on the request, the RECEIVE function 
is terminated with a status indicating "BSC I/O Failure", and a 
BSC return code 20 (wrong length record - long). 

At the completion of the data set transfer, the utility per- 
forms a SETEOD on the data set, and sends the host a Count 
record. The Count record specifies the number of records 
received in the RMCCNT field, and if padding occurred at any 
time, the RMCFLGPD bit of the RMCFLG field is set to 1. The 
RMCFLGPD bit is defined by the value X f 8000 f . 

If the data set to be received by the utility is empty, the host 
should send one Data record which contains no data (only the 
4-byte header), and then the EOT. 
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In the event of unrecoverable errors* such as disk or diskette 
error s t the utility interrupts the host transmission by send- 
ing an EOT ("abort") and a Status record containing the appro- 
priate error code. The utility terminates the RECEIVE 
operation* and then reads again for another request from the 
host. The host should accept the Status record to determine the 
reason for failure. 



( A 



The host may terminate the RECEIVE function 
sending a Status record followed by an EOT. 



at any time by 



The RECEIVE function has no restrictions on receiving data sets 
with names such as SEDXNUC, $$EDXVOL, or $$EDXLIB. However, 
care should be exercised if these data sets are transferred. As 
was previously mentioned, a SETEOD is performed upon com- 
pletion of a data set transfer. The SETEOD may not be performed 
on data sets with the names $$EDXVOL or $$EDXLIB. Thus, if 
these data sets are transferred, the host will receive a Status 
record indicating a SETEOD error. Additionally, SETEOD will 
fail if the data set type is "program". This failure is ignored 
by the Remote Management Utility. 



Required Field Descriptions 



Specify the following fields for the RECEIVE function: 

RMHBSCC A 2-byte hexadecimal field containing the BSC control 
characters DLE STX, specified as X*1002'. 



\_ 



RMHID A 1-byte alphameric field containing the header ID 
'X f , identifying the record as an Event Driven Execu- 
tive Remote Management Utility record. 

RMHTYP A 1-byte alphameric field identifying the header 
type. This field contains the character T R f , specify- 
ing a Request record type. 

RMREQ A 2-byte numeric field specifying the request type. 
For a RECEIVE request, this field contains the number 
1 . 

RMRDSN An 8-byte alphameric field specifying the name of the 
data set to receive data from the host. 

RMRVOL A 6-byte alphameric field specifying the name of the 
volume containing the data set. If RMRVOL is blank, 
the volume name defaults to the IPL volume. 



f~^ 
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RMRSTR 



RMRTYP 



A 4-byte (double word) numeric field specifying the 
starting record of the host data set. Only the second 
word of this field is used. If a value of is speci- 
fied* the data set is received and written from the 
beginning record. If a value greater than zero is 
specified* the utility issues a POINT instruction and 
starts receiving data at the record specified. 

A 2-byte numeric field specifying the type of data to 
be received. Specify one of the following: 



Standard (256-byte records* possibly blocked) 

1 Source (80-byte records* possibly blocked) 

RMRBLK A 2-byte numeric field specifying blocking. A value 
of or 1 specifies no blocking* otherwise it speci- 
fies the number of 80-byte or 256-byte records to be 
received on each Data record. 

Figure 24 on page 246 illustrates the host-remote interaction 
for the RECEIVE function. In the example* the host specifies a 
data set named "MYDATA" on the volume "MYVOL" is to receive two 
256-byte data records. The records to be received start at the 
beginning of the host data set, and are unblocked. The remote 
returns a Count record* and the RECEIVE function terminates. 
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SEND Function 



The SEND function requests the utility to read a disk /diskette 
data set on the remote Series/1 and transmit it to the host. 

The host can specify whether it wants a data set consisting of 
256-byte data records, or a source data set, consisting of 
80-byte text records sent from the remote. The host may also 
specify blocking, in which case, the utility sends records con- 
taining multiples of 256-byte or 80-byte records. 

The host sends the remote Series/1 a Request record with the 
SEND function specified. After receiving and executing the 
request, the utility checks to see if it can handle records of 
the size requested and attempts to open the data set. The util- 
ity then sends a Status record to the host. If a -1 (successful) 
status is returned to the host the SEND function continues, 
otherwise the function is terminated. 



^T™*v 



After sending a successful status to the host, the remote 
Series/1 reads the records from the data set and transmits Data 
records containing the data to the host. If blocking is speci- 
fied, the utility sends blocked Data records to the host. The 
length of the data portion of each Data record, except for the 
last, will be the blocking factor times 256 or 80, depending on 
the data set type. The data portion of the last Data record will 
have a length of a multiple of 256 or 80, however that multiple 
may be less than the blocking factor. For example, if a 
256-byte record data set contains 14 records and a blocking 
factor of 5 is specified, the utility will send two 1285-byte 
records (256x5=1280+5), and one 1029-byte record 
(256x4=1024+5). The actual records are five bytes longer due to 
the 4-byte header and the ETX. 



If the host requests a data set to be sent as source (80-byte 
records) and the data set is not source, the utility will treat 
the data set as source, and discard the remaining 48-bytes 
following the 80-byte records. 

When the last record (the logical end) of the data set is trans- 
mitted to the host, the utility will send a Count record. The 
RMCCNT field of the Count record contains the number of records 
that were sent. The RMCFLG field of the Count record is not used 
for the SEND function. The host should compare this number to 
the number of records received to verify a complete file trans- 
fer . 

In the event of an unrecoverable error, such as a disk or 
diskette read error, the utility sends the host a Status 
record, with the appropriate error code, and terminates the 
SEND function. The host may terminate a SEND function by send- 
ing an EOT ("abort"), followed by a Status record and another 
EOT. 
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Required Field Descriptions 

Specify the following fields for the SEND function: 

RMHBSCC A 2-byte hexadecimal field containing the BSC control 
characters DLE STX, specified as X'lOOZ'. 

RMHID A 1-byte alphameric field containing the header ID 
f X T , identifying the record as an Event Driven Execu- 
tive Remote Management Utility record. 

RMHTYP A 1-byte alphameric field identifying the header 
type. This field contains the character f R * , specify- 
ing a Request record type. 

RMREQ A 2-byte numeric field specifying the request type. 
For a SEND request* this field contains the number 0. 

RMSDSN An 8-byte alphameric field specifying the the name of 
the data set to be transmitted to the host. 

RMSVOL A 6-byte alphameric field specifying the name of the 
volume containing the data set. If RMSVOL is blank, 
the volume name defaults to the IPL volume. 

RMSSTR A 4-byte (double word) numeric field specifying the 
starting record of the data set. Only the second word 
is used. If a value of is specified, the data set is 
sent beginning with the first record. If a value 
greater than zero is specified, the utility issues a 
POINT instruction to start at the record specified. 

RMSTYP A 2-byte numeric field specifying the type of data set 
to send. Specify one of the following: 

Standard (256-byte records, possibly blocked) 

1 Source (80-byte records, possibly blocked) 

RMSBLK A 2-byte numeric field specifying blocking. A value 
of or 1 specifies no blocking; otherwise it speci- 
fies the number of 80-byte or 256-byte records to be 
transmitted on each Data record. 
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Figure 2 5 on page 250 illustrates the host-remote interaction 
for the SEND function. In the example* the host requests that a 
256-byte record data set named "MYDATA" on the volume "MYVOL" 
is to be sent, starting with the first record, with no blocking 
requested. The utility transmits three Data records, sends a 
Count record to the host, and the SEMD function terminates. 
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Figure 25. Communications Flow for the SEND Function 
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SHUTDOWN Function 



The SHUTDOWN function requests the utility to terminate and to 
free up any remote Series/1 resources it has allocated. In 
addition, the SHUTDOWN function can optionally start a program 
to replace the utility. 

The host sends the remote Series/1 a Request record with the 
SHUTDOWN function specified. The request may also specify the 
name of a program to be executed, similar in format to the EXEC 
f unct i on . 

When a program is specified on the SHUTDOWN request, the utili- 
ty issues a LOAD instruction for the program. If the LOAD 
instruction fails, the utility sends the host a Status record 
indicating the error, and the utility remains active. Other- 
wise, the utility sends a successful status via a Status record 
and termi nates . 

If the program specified by the host requires a parameter and 
the parameter is not supplied, the load (via LOAD) of the pro- 
gram will fail. The character string is the parameter(s). For 
further information on parameter passing, refer to the section 
"Parameter Passing" on page 212. 



Required Field Descriptions 



Specify the following fields for the SHUTDOWN function: 

RMHBSCC A 2-byte hexadecimal field containing the BSC control 
characters DLE STX, specified as X f 1002 T . 

RMHID A 1-byte alphameric field containing the header ID 
f X', identifying the record as an Event Driven Execu- 
tive Remote Management Utility record. 

RMHTYP A 1-byte alphameric field identifying the header 
type. This field contains the character 'R' f specify- 
ing a Request record type. 

RMREQ A 2-byte numeric field specifying the request type. 
For a SHUTDOWN request, this field contains the num- 
ber 7 . 

filler A 2-byte reserved field (unused). 
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RMSDFLG A 1-byte numeric field containing the 
RMSDFLGL bits. 



RMSDFLGX and 



J 



RMSDFLGX - When set on, this bit indicates that a pro- 
gram is to be executed. The value for RMSDFLGX when 
set on is X'80' . 

RMSDFLGL - When set on, this bit indicates that a 
"program loaded" message is to be printed on the sys- 
tem logging terminal. RMSDFLGL corresponds to the 
usage of the LOGMSG parameter of the Event Driven 
Language LOAD instruction. The value for RMSDFLGL 
when set on is X'^O*. 

RMSDPTN A 1-byte numeric field specifying the partition the 
program is to run in. Specify one of the following: 

-1 Remote Management Utility partition 
Any partition 
1—8 Specific partition 

RMSDPGM An 8-byte alphameric field specifying the name of the 
program to be executed. 

RMSDVOL A 6-byte alphameric field specifying the name of the 
volume containing the program. If RMSDVOL is blank, 
the volume name defaults to the IPL volume. 

RMSDLFS A 2-byte numeric field specifying the amount of free 
space (in bytes) to pass to the program. 

RMSDPRM* A 2-byte numeric field specifying the length of the 
parameter ( s ) , in words, to pass to the program. This 
field must be zero if no parameters are passed. 

RMSDPRM A variable length field containing the parameter(s) 
to be passed to the program. The length of this field, 
in words, must correspond to the value contained in 
the RMSDPRM* field. See the section "Parameter 
Passing" on page 212 for details on this field. 

RMSDDSt A 2-byte numeric field specifying the number of data 
set names to be passed to the program. The maximum 
number of data set names that may be specified is 
nine. This field must be zero if no data set names are 
passed . 

RMSDDS A variable number of 14-byte alphameric fields 
specifying data set and volume names to be passed to 
the program. The first eight bytes contain the data 
set name, and the last six bytes contain the volume 
name. If the volume name is blank, the name of the 
volume defaults to the IPL volume. The number of data 
set and volume names specified must correspond to the 
value contained in the RMSDDS* field. 
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Figure 2 6 illustrates the host-remote interaction for the 
SHUTDOWN function. In the example, the host sends the remote a 
SHUTDOWN request with a program name specified. The program, 
"MYPROG" on the volume "MYVOL" is to execute in partition 1, 
has 256 bytes of free space passed to it, and has no parameters 
or data sets passed to it. The RMSDFLG field specifies that a 
program is to be executed and a "program loaded" message is to 
be printed following a successful LOAD of the program. The 
remote sends a status of -1 (successful) to the host, loads the 
program, and the utility terminates itself. 
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Figure 26. Communications Flow for the SHUTDOWN Function 
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WRAP Function 



The WRAP function requests the utility to send a block of data 
just received back to the host. 




the host exactly as it was received* and the function termi- 
nates. The utility does not send a Status record to the host 
after execution of a WRAP function. 

A possible use of the WRAP function could be for testing the 
host/remote communications. 






Required Field Descriptions 



Specify the following fields for the WRAP function: 

RMHBSCC A 2-byte hexadecimal field containing the BSC control 
characters DLE STX, specified as X'lOOZ*. 



RMHID A 1-byte alphameric field containing the header ID 
T X * t identifying the record as an Event Driven Execu- 
tive Remote Management Utility record. 



\_ : y 



RMHTYP A 1-byte alphameric field identifying the header 
type. This field contains the character T R"> specify- 
ing a Request record type. 

RMREQ A 2-byte numeric field specifying the request type. 
For a WRAP request, this field contains the number 5. 

RMWTXT A field of any length (not greater than the buffer) 
specifying text to be transmitted back to the host. 
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Figure 27 illustrates the host-remote interaction for the WRAP 
function. In the example* the host sends the remote a WRAP 
request along with the text "WRAP TEXT" specified. The remote 
receives the request and transmits the identical request back 
to the host, and the operation is completed. 



o 
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Figure 27. Communications Flow for the WRAP Function 
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Count Record 



The Remote Management Utility sends a Count record to the host 
after an end-of-data condition is detected during a data set 
transfer (from either a SEND or RECEIVE request). This record 
contains the number of records sent or received by the utility. 
Additionally* the Count record indicates if record padding has 
occurred during the data set transfer. The host should use this 
record to verify whether a complete file transfer has occurred. 






The following is the format of the Count record: 

RMHBSCC A 2-byte hexadecimal field containing the BSC control 
characters DLE STX, specified as X'lOOZ*. 

RMHID A 1-byte alphameric field containing the header ID 
" X * , identifying the record as an Event Driven Execu- 
tive Remote Management Utility record. 

RMHTYP A 1-byte alphameric field identifying the header 
type. This field contains the character f C f > specify- 
ing a Count record type. 

RMCREQ A 2-byte numeric field specifying the request type 
(0 = SEND, 1=RECEIVE) . 



RMCFLG A 2-byte field indicating if record padding has 
occurred during a data set transfer. The bit defined 
by RMCFLGPD (X f 8000') is set to 1 if padding has 
occurred* otherwise 0. 



V.y 



RMCCNT A 4-byte numeric field specifying the number of 
records transmitted. This number reflects the number 
of logical records (80-byte or 256-byte records) 
transmitted* independent of how the records were 
blocked . 
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Data Record 



The Data record is used by the Remote Management Utility to 
send data to or receive data from the host. This record con- 
tains the 80-byte or 256-byte records from a specified data set 
on a SEND or RECEIVE request. 



The following is the format of the Data record: 

RMHBSCC A 2-byte hexadecimal field containing the BSC control 
characters DLE STX, specified as X'1002 f . 

RMHID A 1-byte alphameric field containing the header ID 
f X", identifying the record as an Event Driven Execu- 
tive Remote Management Utility record. 

RMHTYP A 1-byte alphameric field identifying the header 
type. This field contains the character 'D f , specify- 
ing a Data record type. 

RMDDATA A variable-length field containing the data to be 
transmitted (from a SEND or RECEIVE request). The 
length of this field will be a multiple of 80 or 256, 
depending on the type of data transfer. 



o 
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Status Record 



The Status is sent to the host by the Remote Management Utility 
to indicate the success or failure of a requested function. 

The following is the format of the Status record: 

RMHBSCC A 2-byte hexadecimal field containing the BSC control 
characters DLE STX, specified as X'lOO^". 

RMHID A 1-byte alphameric field containing the header ID 
'X', identifying the record as an Event Driven Execu- 
tive Remote Management Utility record. 

RMHTYP A 1-byte alphameric field identifying the header 
type. This field contains the character 'S'> specify- 
ing a Status record type. 



V„y' 



RMSREQ A 2-byte numeric field specifying the request type. 

RMSFN A 2-byte numeric field indicating the success of the 
request. If the request is successful this field will 
contain a -1, otherwise this field will contain a pos- 
itive value indicating the error which occurred. The 
equated values, included in the copy code CDRRM, with 
the names beginning with the RMSFN field define these 
errors . 

RMSST A 2-byte numeric field with a return code if an Event 
Driven Executive function failed. For example, if 
RMSFN contained the value 24 (LOAD failed), RMSST 
will contain the return code from the LOAD 
i nst r uct i on . 

RMSRID An 8-byte alphameric field specifying the ID of the 
remote Series/1 on completion of a successful IDCHECK 
request. This field is not sent to the host if the 
IDCHECK request fai Is. 



\, 
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Sample Host Programs 

The following sample programs illustrate host programs (on a 
host Series/1) which can communicate with and perform func- 
tions of the Remote Management Utility. 



c 
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This sample host program can perform all the functions of the 

utility except SEND, RECEIVE, and PASSTHRU. This program sends 

an ALLOCATE request and prints a status message, but could be 
used for the other functions by simply defining the fields of 
the desired request at label " R M " . 

UT PROGRAM START 

START EQU * 

BSCOPEN IOCB,ERROR=BSCERR OPEN BSC LINE 

MOVE I0CB3,+REQLEN LENGTH OF REQUEST 

* IN IOCB 
BSCNRITE IX,IOCB,ERROR=BSCERR WRITE REQUEST 
BSCWRITE E,IOCB,ERROR=BSCERR WRITE EOT 

MOVEA I0CB2,ST ADDRESS OF STATUS 

MOVE IOCB3,20 LENGTH OF STATUS 

* IN IOCB 

BSCREAD I,IOCB,ERROR=BSCERR,TIMEOUT=NO READ STATUS 

SUB IOCB,IOCB2,RESULT=PN2 LENGTH INTO PRINTNUM 

ADD PN2,+1 

SHIFTR PN2,1 CONVERT LENGTH TO WORDS 

PRINTEXT '3STATUS MESSAGED 1 

PRINTNUM ST,0,MODE=HEX,P2=PN2 PRINT STATUS MSG 

BSCREAD C,IOCB,ERROR=BSCERR,TIMEOUT=NO READ EOT 

IF (ST+6,EQ,-1) IF SUCCESSFUL STATUS 

* THEN 
PRINTEXT f 3FUNCTI0N SUCCESSFUL' 

ELSE ELSE f 

PRINTEXT "SFUNCTION FAILED* \ 

ENDIF ENDIF 

TERM EQU * TERMINATION POINT 

BSCCLOSE IOCB CLOSE BSC LINE 

PROGSTOP 
* 

BSCERR EQU * BSC ERROR ROUTINE 

MOVE ST,UT MOVE RETURN CODE 

PRINTEXT '3BSC ERROR: • 

PRINTNUM ST PRINT RETURN CODE 

GOTO TERM GO TO TERMINATION 

* 

IOCB BSCIOCB 9,RM,0,P2=IOCB2,P3=IOCB3 IOCB 

* P2=IOCB2 IS MESSAGE ADDRESS 

* P3=IOCB3 IS MESSAGE LENGTH 
* 

ST DATA lOF'O' AREA FOR STATUS RECORD 

* 10 BYTES NORMAL STATUS RECORD 

* 8 BYTES IDCHECK STATUS EXT. 

* 1 BYTE ETX 

x 

* 19 BYTES TOTAL, ROUNDED UP TO 

* 10 WORDS 



y 
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^^j^J^ 



* — THE 

* 

RM 


FOLLOWING 


MAY BE CHANGED 


EQU 


X 


RMHBSCC 


DATA 


X T 1002 T 


RMHID 


DATA 


C'X* 


RMHTYP 


DATA 


C'R' 


RMREQ 


DATA 


F'2' 


RMADSN 


DATA 


CLS'MYDATA* 


RMAVOL 


DATA 


CL6 f MYVOL* 


RMANREC 


DATA 


D f 10 T 


RMADST 


DATA 


F T 1 T 


REQLEN 
* 


EQU 


*-RM 


ENDPROG 






END 





FOR OTHER REQUESTS — * 

REQUEST 

BSC CTRL CHARS (DLE STX) 
HEADER ID 

HEADER TYPE: REQUEST 
REQUEST TYPE: ALLOCATE 
DATA SET NAME: MYDATA 
VOLUME NAME: MYVOL 
NUMBER RECORDS: 10 
DATA SET TYPE: DATA 

LENGTH OF REQUEST 



o 
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This sample host program receives data set "MYDATA" at the 
remote Series/1 from the host Series/1. Data is blocked with a 
factor of 2, and transferred as 80-byte records. 



y 



EXRECV PROGRAM START , DS= (( RECVDS ,??) ) 
START EQU * 

BSCOPEN IOCB,ERROR=BSCEOPN OPEN BSC LINE 



MOVE I0CB3,+REQLEN 
BSCWRITE IX,IOCB,ERROR=BSCERR 
BSCWRITE E,IOCB,ERROR=BSCERR 



LENGTH OF REQUEST IN IOCB 
NRITE REQUEST 
WRITE EOT 



MOVEA IOCB2,ST 

MOVE IOCB3,+STL 

BSCREAD I,IOCB,ERROR=BSCERR 

BSCREAD C,IOCB,ERROR=BSCERR 

IF (STSFN,NE,-1) 



PRINTEXT 
PRINTNUM 
GOTO 



•3STATUS INDICATES 

ST,5,M0DE=HEX 

TERM1 



ENDIF 



ADDRESS OF STATUS 

LENGTH OF STATUS IN IOCB 

READ STATUS 

READ EOT 

IF STATUS INDICATES ERROR 

ERROR* THEN PRINT IT 

TERMINATE 
ENDIF 



DATA 



RDEND 



MOVEA 

MOVE 

EQU 

READ 

MOVE 

MOVE 

IF 

BSC 
ELSE 

BSC 
ENDIF 
ADD 
GOTO 
EQU 
BSCWR 
BSCRE 
BSCRE 
IF 
PRI 
PRI 
ELSE 
PRI 
PRI 
PRI 
PRI 
ENDIF 



IOCB2,DT 
IOCB3,+DTL 

DS1,DISKRE 
DTDATA,DIS 
DTDATA+80, 
(COUNT, EQ, 
WRITE IX, IOCB, 



ADDRESS OF DATA 
SET LENGTH 



C,ERROR=RDER 
KREC, (80, BYT 
DISKREC+128, 
0) I 

ERROR=BSCERR 

E 
WRITE CX,IOCB,ERROR=BSCERR 

E 



COUNT, 2 

DATA 

* 
ITE E,IOCB,ERROR=BS 
AD I,IOCB,ERROR=BS 
AD C,IOCB,ERROR=BS 

(DTCCNT,EQ,COUN 
NTEXT 'COUNT OK: • 
NTNUM COUNT 



CERR 
CERR 
CERR 
T) 



R,END 
E) 

(80, B 
F FIR 
,END = 
LSE 
,END = 
NDIF 
DD 2 
ONTIN 
HER 
RITE 
EAD C 
EAD E 
F COU 
PRIN 



=RDEND READ RECORD 

FIRST RECORD 
YTE) SECOND RECORD 
ST TIME THEN 
BSCAB WRITE INITIAL 

BSCAB WRITE CONTINUE 



OUNT 

RANSFERRING DATA 
EN AT ENDFILE 



TO C 

UE T 

E WH 

EOT 

OUNT 

OT 

NT OK THEN 

T IT 



NTEXT '3C0UNT FAILED. 
NTNUM COUNT 

NTEXT f COUNT RECORD: 
NTNUM DTCCNT 



ELSE 
COUNTED: ' 

PRINT COUNTS 



ENDIF 
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TERMl EQU x EXIT POINT FOR NORMAL TERM 

BSCCLOSE IOCB CLOSE BSC LINE 

TERM2 EQU * EXIT POINT FOR OPEN FAILED 

PROGSTOP 
BSCAB EQU * ABORT RECEIVED ON WRITE 

BSCREAD I,IOCB,ERROR=BSCERR READ STATUS 

BSCREAD C,IOCB,ERROR=BSCERR READ EOT 

PRINTEXT T 3AB0RT RECEIVED. STATUS:* 

PRINTNUM DT,5,M0DE=HEX 

GOTO TERMl TERMINATE 

x 

BSCERR EQU * BSC ERROR ROUTINE 

MOVE ST,EXRECV MOVE RETURN CODE 

PRINTEXT f 3BSC ERROR:' 

PRINTNUM ST PRINT RETURN CODE 

GOTO TERMl GO TO TERMINATION 

x 

BSCEOPN EQU * OPEN ERROR 

MOVE ST,EXRECV MOVE RETURN CODE 

PRINTEXT f 3BSC OPEN ERROR: 1 

PRINTNUM ST PRINT RETURN CODE 

GOTO TERM2 GO TO TERMINATION 

x 

RDERR EQU * DISK READ ERROR 

MOVE ST,EXRECV MOVE RETURN CODE 

PRINTEXT f 3DISK READ ERROR: 1 

PRINTNUM ST PRINT RETURN CODE 

MOVEA IOCB2,ST POINT IOCB TO 

* STATUS MESSAGE 
MOVE I0CB3,4 SET LENGTH TO 4 

MOVE STiX'lOOZ 1 SET UP STATUS MESSAGE 

MOVE ST+2,C f XS f 

BSCWRITE IX, IOCB,ERROR=BSCERR SEND STATUS MESSAGE 

BSCWRITE E,IOCB,ERROR=BSCERR SEND EOT 

GOTO TERM2 GO TO TERMINATION 

IOCB BSCIOCB 9,RM,0,P2=IOCB2,P3=I0CB3 IOCB 

* P2= IS RECORD ADDRESS 

* P3= IS RECORD LENGTH 

RLEN DATA F^' RECORD LENGTH 

COUNT DATA F f • RECORD COUNT 
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* — 

RM 

RMHBSC 

RMHID 

RMHTYP 

RMREQ 

RMRDSN 

RMRVOL 

RMRSTR 

RMRTYP 

RMRBLK 

REQLEN 

*-- S 

* 



REQUEST TO RECEIVE A DATA SET 



EQU * 

C DATA X'1002' 

DATA C T X' 

DATA C ? R' 

DATA FT 

DATA CL8 f MYDATA f 

DATA CL6 f ' 

DATA D'O' 

DATA F'l f 

DATA F'2 T 

EQU *-RM 
TATUS RECORD 

DATA 6F'0 f 



ST 

* 

* 

* 

STSFN 

STL 

* 

* — DATA AND COUNT RECORD 

* 

DT 



EQU ST+6 
EQU *-ST 



DTCCNT 

DTDATA 

DTL 

* 

DISKREI 



DATA 

DATA 

EQU 

DATA 

EQU 



X , 1002 f 
C f XD f 
DT+10 
160C ' 
*-DT 



DATA 128F f 0' 

ENDPROG 

END 



REQUEST 

BSC CNTRL CHARS (DLE STX) 
HEADER ID 

HEADER TYPE: REQUEST 

REQUEST TYPE: RECEIVE 

DATA SET NAME: MYDATA 

VOLUME NAME: (IPL VOL) 

STARTING RECORD: NONE 

RECEIVE TYPE: SOURCE 

BLOCKING FACTOR: 2 

LENGTH OF REQUEST 



AREA FOR STATUS RECORD 
10 BYTES FOR STATUS RECORD, 
1 BYTE FOR ETX, ROUNDED UP 
TO 6 WORDS 

STATUS FUNCTION 

STATUS RECORD LENGTH 



DATA RECORD: DLE STX 
HEADER ID, TYPE (DATA) 
LOCATION OF COUNT 



LENGTH 

DISK RECORD AREA 



__y 
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This sample host program executes a PASSTHRU session through 
the utility. The session is established with the Event Driven 
Executive supervisor. Blocking is used. All terminal I/O is 
performed to make the host terminal appear as if the terminal 
were connected at the remote Series/1. 



o 



EXP 

* 
* 
* 
* 
x 
x 
x 
x 
x 
x 
x 
x 
x 
STA 

x 

x — 
x 



ASST PROGRAM START , TERMERR=TERM1 

THIS EXAMPLE HOST PROGRAM USES THE PASSTHRU FUNCTION 
OF THE REMOTE MANAGEMENT UTILITY. THE OPERATOR IS 
ASKED WHETHER TO START THE PASSTHRU ASSIST PROGRAM. 
IF SO, THE PROGRAM SRMUPA IS INVOKED. AFTER THIS, A 
SESSION IS ESTABLISHED WITH THE EDX SUPERVISOR. 

WHENEVER A "PROGRAM END" PASSTHRU RECORD IS RECEIVED, 
A "REQUEST DATA" RECORD IS SENT. WHEN A "NO DATA" 
RECORD IS RECEIVED, THE OPERATOR IS ASKED WHETHER TO 
"ATTN" (END THE SESSION AND START ANOTHER), "READ" 
(TRY TO ACQUIRE DATA FROM THE HOST), OR "QUIT" (END 
THE PASSTHRU SESSION AND THEN TERMINATE. 



RT 



EQU x 
BSCOPEN 



IOCB,ERROR=BSCEOPN 



OPEN BSC LINE 



START UP PASSTHRU ASSIST PROGRAM (SRMUPA) IF NEEDED 

QUESTION 'START PASSTHRU ASSIST PROGRAM? f , NO=START2 



MOVEA IOCB2,REQPTAS 

MOVE IOCB3,+REQPTASL 

BSCWRITE IX,IOCB,ERROR=BSCERR 

BSCWRITE E,IOCB,ERROR=BSCERR 



ADDRESS OF REQUEST IN IOCB 
LENGTH OF REQUEST IN IOCB 
WRITE REQUEST 
WRITE EOT 



MOVEA IOCB2,ST 

MOVE IOCB3,+STL 

BSCREAD I , IOCB,ERROR=BSCERR 

BSCREAD C, IOCB,ERROR=BSCERR 

IF (STSFN,NE,-1) 



PRINTEXT 
PRINTNUM 
GOTO 
ENDIF 



'3STATUS INDICATES 

ST,5,MODE=HEX 

TERM1 



ADDRESS OF STATUS 

LENGTH OF STATUS IN 

READ STATUS 

READ EOT 

IF STATUS INDICATES 

ERROR 1 PRINT IT 

TERMINATE 
ENDIF 



IOCB 



ERROR 
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MOVEA IOCB2,DT ADDRESS OF DATA 

MOVE I0CB3,+DTL SET LENGTH >— y 

BSCREAD I,IOCB,ERROR=BSCERR,TIMEOUT=NO U J 

* READ, EXPECT PROGRAM END 
BSCREAD C, IOCB,ERROR = BSCERR,TIMEOUT = NO READ EOT 

IF (EXPASST,EQ,+1),AND, ( DT+RMPTYP , EQ , +RMPTYPPE ) 

* IF PGM END AND EOT THEN 
MOVE DT,X'1002 ? SET UP PTHRU PGM END 
MOVE DT+RMPTYP, +RMPTYPPE PTHRU TYPE IS PGM END 
MOVE I0CB3,+RMPX SET UP LENGTH IN IOCB 
BSCNRITE IX,IOCB,ERROR=BSCERR,END=BSCAB WRITE TO RMU 
BSCWRITE E,IOCB,ERROR=BSCERR WRITE EOT 

ELSE ELSE 

MOVE ST,EXPASST SAVE RETURN CODE 

PRINTEXT ^UNSUCCESSFUL LOAD OF PASSTHRU ASSIST PGM.' 

PRINTEXT '3LAST MESSAGE READ: 1 

PRINTNUM DT,10,MODE=HEX PRINT MESSAGE 

PRINTEXT "3LAST RETURN CODE FROM READ:' 

PRINTNUM ST,MODE=HEX PRINT RETURN CODE 

GOTO TERM1 TERMINATE 

ENDIF ENDIF 

* 

* — MAIN PASSTHRU PROCESSING. SEND REQUEST 

* 

START2 MOVEA IOCB2,REQPT ADDRESS OF REQUEST IN IOCB 

MOVE IOCB3,+REQLEN LENGTH OF REQUEST IN IOCB 

BSCNRITE IX,IOCB,ERROR=BSCERR WRITE REQUEST 

BSCWRITE E,IOCB,ERROR=BSCERR WRITE EOT /^^ 

MOVEA IOCB2,ST ADDRESS OF STATUS 

MOVE IOCB3,+STL LENGTH OF STATUS IN IOCB 

BSCREAD I,IOCB,ERROR=BSCERR READ STATUS 

BSCREAD C, IOCB,ERROR=BSCERR READ EOT 

IF (STSFN,NE,-1) IF STATUS INDICATES ERROR 

PRINTEXT *aSTATUS INDICATES ERROR' PRINT IT 

PRINTNUM ST,5,MODE=HEX 

GOTO TERM1 TERMINATE 

ENDIF ENDIF 
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EQU 


* 


MOVEA 


IOCB2,DT 


MOVE 


IOCB3,+DTL 


IF 


(BSCST,NE,+BSCSTRD) 



READ 

ADDRESS OF DATA 
SET LENGTH 

IF BSC STATE IS NOT READ 
BSCREAD I,IOCB,ERROR=BSCERR,TIMEOUT=NO READ INIT 
MOVE BSCST,+BSCSTRD BSC STATE = READ 

ELSE ELSE 

BSCREAD C,IOCB,ERROR=BSCERR,TIMEOUT=NO READ CONT 
ENDIF ENDIF 

* 

IF (DT+RMHTYP,NE,C , P t ,BYTE) IF NOT PASSTHRU THEN 
PRINTEXT '3N0N-PASSTHRU MESSAGE RECEIVED:' 
PRINTNUM DT,5,M0DE=HEX PRINT WHAT WAS RECEIVED 

* (WILL BE STATUS) 
BSCREAD C,IOCB,ERROR=BSCERR,TIMEOUT=NO READ EOT 
GOTO TERM1 TERMINATE 

ENDIF ENDIF 

* — CASE: PASSTHRU TYPE 

GOTO (ERRPT,TEXT,REQD,PGME,NODA) ,DT+RMPTYP 
* 
TEXT EQU * PASSTHRU TYPE: DATA 

MOVEA #1,DT+RMPST SET #1 TO BEGINNING OF TXT 

DO UNTIL, (#l,EQ,IOCB) DO UNTIL AT END OF TEXT 

* CIOC^ CONTAINS ADDRESS 

* OF BYJE PAST LAST BYTE 

* OF DATA) 

IF ((0,#1),EQ,-1),OR, ((0,#l),EQ,-2) IF TEXT 
PRINTEXT (4,#1) ,MODE=LINE PRINT TO TERMINAL 
IF ((0,#1),EQ,-1) IF NEWLINE 

PRINTEXT SKIP=1 THEN DO NEWLINE 

ENDIF ENDIF 

ADD #1,(2,#1) POINT #1 TO NEXT TEXT 

ADD #1,5 ADD HEADER LENGTH + 1 

AND #l,X f FFFE T POINT TO EVEN BOUNDARY 

ELSE ELSE 

IF C(0,#1),EQ,X T 8F» ,BYTE) IF LINE= THEN 
AND (0,#l),X f 00FF f ,RESULT = N1 DO»IT 
PRINTEXT LINE=N1 ON TERMINAL 

ELSE ELSE 

IF ((0,#l),EQ,X , 8E f ,BYTE) IF SKIP= THEN 
AND (0,#l),X , 00FF f ,RESULT=N1 DO IT 
PRINTEXT SKIP=N1 ON TERMINAL 

ENDIF ENDIF 

ENDIF ENDIF 

ADD #1,4 POINT #1 TO NEXT 

* TEXT BLOCK 
ENDIF ENDIF 

ENDDO ENDDO 

GOTO READ END TEXT PROCESSING 
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REQD 



* 

PGME 
* 



* 
NODA 

NODAQ 



EQU 

BSCRE 

MOVE 

READT 

MOVE 

MOVE 

MOVE 

IF 

MOV 
MOV 
AND 
MOV 
ELSE 
MOV 
ADD 
ENDIF 
BSCWR 
BSCWR 
MOVE 
GOTO 

EQU 



* PASSTHRU TYPE: REQ DATA 

AD C,IOCB,ERROR=BSCERR READ EOT 

DT+RMPTXTL,X'FEOO f SET UP "TEXT" STATEMENT 
EXT DT+RMPTXT, MODE=LINE GET TEXT FROM TERMINAL 

DT,X f 1002' SET UP PTHRU TEXT RECORD 

DT+RMPTYP,+RMPTYPTX PTHRU TYPE IS TEXT OR PFK 
DT+RMPTXTL,0,BYTE ZERO HI-ORDER LENGTH BYTE 
( DT+RMPTXT L,GE, 4) , AND, ( DT+RMPTXT , EQ , C ? $P • ) , 
AND, (DT+TXT2,EQ,C f F' , BYTE) IF "$PFN" ENTERED 
E DT+RMPTXTL,-1 INDICATE PF KEY 

E DT+RMPTXT, DT+TXT2 PLACE NUMBER IN MSG 

DT+RMPTXT, X'OOOF' PURIFY NUMBER 
E IOCB3,2+RMPTXT LENGTH IN IOCB 

ELSE 

SET UP LENGTH IN IOCB 
INCLUDING HEADER 
ENDIF 
ERR,END=BSCAB WRITE TO RMU 
RR WRITE EOT 

BSC STATE = RESET 

END REQ TEXT PROCESSING 



E IOCB3, DT+RMPTXT 
IOCB3,+RMPTXT 

ITE IX,IOCB,ERROR=BSC 
ITE E, IOCB,ERROR = BSCE 

BSCST,+BSCSTO 

READ 



PASSTHRU TYPE 



BSCREAD 
GOTO 

EQU 

BSCREAD 

PRINTEX 

READTEX 

IF 



C,IOCB,ERROR=BSCERR 
SNDRQD 



PROGRAM END 
(DISCONNECT) 

READ EOT 

GO AND REQUEST DATA 



C,IOCB,ER 
T ' 3"N0 DAT 
T INMSG, f 3 

(INMSG,EQ 



ROR = B 

A" RE 

A(TT 

,C f A' 



SCER 
CEIV 
N), 
,BYT 



P 
R R 
ED. 
R(EA 
E) ,0 

I 



MOVE 

MOVE 

MOVE 

BSCWR 

BSCWR 

MOVE 

IF 



GOTO 
ELSE 

IF 

GOTO 
ENDIF 



DT,X f 10 
DT+RMPT 
I0CB3,+ 
ITE IX, IOCB 
ITE E,IOCB, 
BSCST,+ 
(INMSG, 



TERM1 

(INMSG, 
NODAQ 



02 f 

YP,+RMPTYPPE 

RMPX 

,ERRO 

ERROR 

BSCST 

EQ,C 



R=BSCERR 

=BSCERR 



A' ,BYTE) 



E 
EQ,C ? R' ) ,GOTO 



ASSTH 

EAD E 

ENTE 

D) , Q 

R, ( IN 

F "AT 

SEND 

SET 

PTHR 

SET 

,END = 

WRIT 

BSC 

,GOTO 

IF " 

SESS 

OTHE 

LSE ( 



,SNDR 

ELSE 
NDIF 



RU 

OT 

R ON 

(UIT 

MSG, 

TN" 

PRO 
UP P 
U TY 
UP L 
BSCA 
E EO 
STAT 
,STA 
A" T 
ION 
RWIS 
NOT 
R "Q 
QD 

ASK 



TYPE: NO DATA 



E: ' 

) T 

EQ,C'Q f ,BYTE) 

OR "QUIT" THEN 

GRAM END 

THRU PGM END 

PE IS PGM END 

ENGTH IN IOCB 

B WRITE TO RMU 

T 

E = RESET 

RT2 

HEN START NEW 

E TERMINATE 
"ATTN" 
UIT") 

IF "R" THEN 
REQUEST DATA 
AGAIN 



^. 



V. 
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ERRPT 



* 

* 
SNDRQD 



* 

TERM1 

TERM2 

* 
BSCAB 



* 
BSCERR 



EQU * PASSTHRU TYPE: 

PRINTEXT '3INVALID PASSTHRU RECORD RECEIVED: 
PRINTNUM DT,20,MODE=HEX 

GOTO TERM1 TERMINATE 



UNKNOWN 



END OF CASES 



EQU 

MOVE 

MOVE 

MOVE 

BSCNRITE 

BSCWRITE 

MOVE 

GOTO 



EQU 

BSCCLOSE 
EQU 
PROGSTOP 

EQU 

BSCREAD 

BSCREAD 

PRINTEXT 

PRINTNUM 

GOTO 

EQU * 

MOVE 

PRINTEXT 

PRINTNUM 

GOTO 



DT,X T 1002' 

DT+RMPTYP,+RMPTYPRD 

IOCB3,+RMPX 



SEND REQUEST DATA 
SET UP PTHRU REQUEST DATA 
PTHRU TYPE IS REQEST DATA 
SET UP LENGTH IN IOCB 



IX,IOCB,ERROR=BSCERR,END=BSCAB WRITE TO RMU 



E, IOCB,ERROR=BSCERR 

BSCST,+BSCSTO 

READ 



WRITE EOT 

BSC STATE = RESET 

END REQ TEXT PROCESSING 



* 

IOCB 

* 



EXIT POINT FOR 
CLOSE BSC LINE 
EXIT POINT FOR 



NORMAL TERM 



OPEN FAILED 



* ABORT RECEIVED 

I, IOCB,ERROR=BSCERR READ STATUS 

C,IOCB,ERROR=BSCERR READ EOT 

'3AB0RT RECEIVED. STATUS:' 

DT,20,MODE=HEX 

TERM1 TERMINATE 



BSC ERROR ROUTINE 
ST,EXPASST MOVE RETURN CODE 

T 3BSC ERROR: ' 

ST PRINT RETURN CODE 

TERM1 GO TO TERMINATION 



ON WRITE 



BSCEOPN EQU * OPEN ERROR 

MOVE ST,EXPASST MOVE RETURN CODE 

PRINTEXT 'SBSC OPEN ERROR:' 

PRINTNUM ST PRINT RETURN CODE 

GOTO TERM2 GO TO TERMINATION 
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x — 

x 

INM 

x 

IOC 

x 

x 

x 

X-- 

X 
REQ 



DATA AREA 
SG TEXT LENGTHS 
B BSCIOCB 9,0,0,P2= 



REQUEST FOR PASSTHRU 



PT 



LEN 



EQU x 

DATA X'1002' 

DATA CX' 

DATA C f R r 

DATA A(RMREQPST) 

DATA A(PBL) 

DATA H'O' 

DATA H T T 

DATA CL8' T 

DATA CL6 f ' 

DATA 3F'0" 

EQU *-REQPT 



INPUT MSG FROM OPERATOR 

I0CB2,P3=I0CB3 IOCB 

P2= IS RECORD ADDRESS 
P3= IS RECORD LENGTH 



REQUEST 

BSC CONTROL CHARS (DLE STX) 

HEADER ID 

HEADER TYPE: REQUEST 

REQUEST TYPE: PASSTHRU (12) 

PASSTHRU BLKING 

FLAG (UNUSED) 

PARTITION (UNUSED) 

PROGRAM: EDX SUPERVISOR 

VOLUME (UNUSED) 

(REMAINDER UNUSED) 
LENGTH OF REQUEST 



REQ 

x 

x — PASSTHRU REQUEST: START PASSTHRU ASSIST PROGRAM 

x 

REQPTAS 



REQPTASL 



EQU x 

DATA X f 1002 ? 

DATA C'X 1 

DATA C'R» 

DATA A(RMREQPST) 

DATA A(0) 

DATA H f f 

DATA H f f 

DATA CL8 f $RMUPA f 

DATA CL6' T 

DATA F ? f 

DATA F'O 1 

DATA F'O 1 

EQU *-REQPTAS 



REQUEST 

BSC CONTROL 
HEADER ID 
HEADER TYPE: 
REQUEST TYPE: 
PASSTHRU BLKING 
FLAG (UNUSED) 
PARTITION 
PROGRAM: 
VOLUME: 
FREE SPACE: 
PARAMETERS: 
DATA SETS: 

LENGTH OF REQUEST 



CHARS (DLE STX) 



REQUEST 

PASSTHRU 

(NONE) 

(ANY) 

$RMUPA 

I PL 

NONE 

NONE 

NONE 



(12) 



V-_y 
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* 

* — STATUS RECORD 

* 

ST DATA 6F'0' AREA FOR STATUS RECORD 

* 10 BYTES FOR STATUS RECORD, 

* 1 BYTE FOR ETX, ROUNDED UP 

* TO 6 WORDS 
STSFN EQU ST+6 STATUS FUNCTION 

STL EQU *-ST STATUS RECORD LENGTH 

* 

* — PASSTHRU SESSION AREA 

* 

DT DATA 256F»0 ? RECORD 

DTL EQU *-DT LENGTH 

PBL EQU DTL-8 PASSTHRU BLOCK LENGTH 

* LENGTH OF DATA AREA - 

* 6 BYTES FOR HEADER AND 2 

* FOR ETX AND WORD ROUND UP 

* — MISCELLANEOUS VARIABLES 

BSCST DATA F f f BSC STATE: 

BSCSTO EQU RESET 

BSCSTRD EQU 1 READING 

Nl DATA F'0 f WORK WORD 

COPY CDRRM INCLUDE DEFINITION OF RMU MSGS 

TXT2 EQU RMPTXT+2 BYTE 2 OF PASSTHRU TEXT 

* 

ENDPROG 

END 
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This sample interaction with the PASSTHRU host program illus- 
trates running the $DEBUG utility under the PASSTHRU function. 

(4 \ 

(Attention) X.J 

> $L EXPASST 
EXPASST 9P lP=C900 

START PASSTHRU ASSIST PROGRAM? Y 

> $L $DEBUG 

$DEBUG 27P, 09:44:08 LP=BF00 
PROGRAM NAME: $DISKUT1 
$DISKUT1 30P, 09:44:14 LP = DA00 

REQUEST "HELP" TO GET LIST OF DEBUG COMMANDS 
TASK STOPPED AT 0064 
"NO DATA" RECEIVED. ENTER ONE: 
A(TTN), R(EAD), Q(UIT) A 

> WHERE 

TASK STOPPED AT 0064 
$ATTASK AT 2600 

"NO DATA" RECEIVED. ENTER ONE: 
A(TTN), R(EAD), Q(UIT) A 

> GO 
OPTION(*/ADDR/TASK/ALL) : ALL 

1 BREAKPOINT(S) ACTIVATED 
USING VOLUME EDX002 
COMMAND (?) : LA ZZZZ 
USING VOLUME EDX002 

NAME FREC SIZE 

12845 FREE RECORDS IN LIBRARY ^ ^ 

COMMAND (?): $PF0 



XX 

> WHERE 

INVALID COMMAND 
TASK AT 0274 
$ATTASK AT 2600 
COMMAND (?): $PF0 
XX 

> AT 

INVALID COMMAND 
OPTION(*/ADDR/TASK/ALL) : A 
BREAKPOINT ADDR: 274 
LIST/NOLIST: N 
STOP/NOSTOP: S 

1 BREAKPOINT(S) SET 
COMMAND: XX 
TASK STOPPED AT 0274 
"NO DATA" RECEIVED. ENTER ONE: 

A(TTN), R(EAD), Q(UIT) A 

> LIST A 274 5 X 

0274 X* 80AF 1010 C9D5 E5C1 D3C9' 
"NO DATA" RECEIVED. ENTER ONE: 
A(TTN), R(EAD), Q(UIT) A 

> END 

1 BREAKPOINT(S) REMOVED 
INVALID COMMAND 
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COMMAND (?): EN 
"NO DATA" RECEIVED 



ENTER ONE 
R(EAD), Q(UIT) R 
RECEIVED. ENTER ONE 
R(EAD), Q(UIT) A 



RECEIVED. ENTER ONE 
R(EAD), Q(UIT) A 



A(TTN) , 

"NO DATA" 

A(TTN) , 

> $RMUPA 
"NO DATA" 

A(TTN) , 

> $A 

PROGRAMS AT 09:50:26 

IN PARTITION fl NONE 

"NO DATA" RECEIVED. ENTER ONE 

A(TTN), R(EAD), Q(UIT) Q 
EXPASST ENDED 



o 
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This sample host program sends data set "MYDATA" from the 
remote Series/1 to the host Series/1. Data is blocked with a 
factor of 3» and transferred as 256-byte records. 



EXSEND 
START 



DATA 



PROGRAM 

EQU * 

BSCOPEN 

MOVE 

BSCWRITE 

BSCWRITE 

MOVEA 

MOVE 

BSCREAD 

IF 

BSCREAD 
PRINTEX 
PRINTNU 
GOTO 

ENDIF 

MOVEA 

EQU 

MOVE 

BSCREAD 

SUB 

IF 
SUB 

SHIFTR 

WRITE 
ADD 

GOTO 
ELSE 
IF 
IF 



START, DS=( (SENDDS,??) ) 



IOCB 
IOCB 
IX, I 
E,IO 
IOCB 
IOCB 
I, 10 
(STS 

C, 
T ? d 
M ST 

TE 



,ERRO 

3,+RE 

OCB,E 

CB,ER 

2, ST 

3,+ST 

CB,ER 

FN,NE 

IOCB, 

STATU 

,5, MO 

RM1 



R=BSCEOPN 
QLEN 

RROR=BSCERR 
ROR=BSCERR 



I0CB2,DT 
* 

I0CB3,+DT 
C, IOCB,ER 
IOCB, IOCB 
(DTHTYPR, 
RLEN,+4 

RLEN,8 

DS1,DTD 
COUNT, R 

DATA 

(DTHTYP 
(DTCC 



OPEN BS 
LENGTH 
WRITE R 
WRITE E 
ADDRESS 
L LENGTH 

ROR=BSCERR READ ST 
,-1) IF STAT 

ERROR=BSCERR READ 
S INDICATES ERROR 1 
DE=HEX 

TERMI 
ENDIF 
ADDRESS 



C LINE 

OF REQUEST IN IOCB 

EQUEST 

OT 

OF STATI 
OF STATU 1 
ATUS 
US INDIC, 

EOT 

THEN PR 

NATE 
OF DATA 



US 

S IN IOCB 

ATES ERROR 

INT IT 



L S 

ROR=BSCERR R 
2,RESULT=RLEN 
EQ,C'D f ,BYTE) 



PRINTEXT *C0 
PRINTNUM COU 
ELSE 

PRINTEXT "CO 
PRINTNUM COU 
PRINTEXT ' 
PRINTNUM DTC 
ENDIF 
ELSE 

PRINTEXT T ERRO 
PRINTNUM DT,5, 
ENDIF 
ENDIF 



ATA,RLEN,ERRO 
LEN 



R,EQ,C T C f ,BYT 
NT, EQ, COUNT) 
UNT OK: » 
NT 

UNT FAILED. 

NT 

COUNT RECORD: 

CNT 



ET LE 

EAD D 
COM 
IF D 
-4 F 
FOR 
RLEN 
WRIT 

R = WRE 
ADD 
TO C 
GO R 

LSE 

E) I 
IF 



NGTH TO M 
ATA OR CO 
PUTE LENG 
ATA THEN 
ROM LENGT 
HEADER 

= NUMBER 
E RECORDS 
RR,END=WR 
NUMBER WR 
OUNT 
EAD NEXT 

F COUNT T 
COUNT OK 
PRINT IT 



AX 

UNT 

TH 

H 

RECORDS 

NEXT 
ERR 
ITTEN 

RECORD 

HEN 
THEN 



ELSE 
COUNTED: ' 
PRINT 



COUNTS 



R MSG RECEIVE 
MODE=HEX 



ENDIF 
ELSE MUST BE STATUS 
D: ' 

PRINT IT 
ENDIF 
NDIF 



V_>' 
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BSCREAD C,IOCB,ERROR=BSCERR READ EOT 



o 



TERM1 
TERM2 
BSCERR 



BSCEOPN 



* 
WRERR 



* 

IOCB 

x 

x 

x 

RLEN 

x 

COUNT 

x 

*-- REQ 

x 

RM 

RMHBSCC 

RMHID 

RMHTYP 

RMREQ 

RMSDSN 

RMSVOL 

RMSSTR 

RMSTYP 

RMSBLK 

REQLEN 



EQU 

BSCCLOSE 

EQU 

PROGSTOP 

EQU * 

MOVE 

PRINTEXT 

PRINTNUM 

GOTO 

EQU * 

MOVE 

PRINTEXT 

PRINTNUM 

GOTO 

EQU x 

MOVE 

PRINTEXT 

PRINTNUM 

BSCWRITE 

MOVEA 

MOVE 

MOVE 

MOVE 

BSCWRITE 

BSCWRITE 

GOTO 

BSCIOCB 



DATA 



x 

IOCB 

x 



ST,EXSEND 
'3BSC ERROR 
ST 
TERM1 



EXIT POINT FOR 
CLOSE BSC LINE 
EXIT POINT FOR 



NORMAL TERM 



OPEN FAILED 



BSC 



ERROR ROUTINE 

MOVE RETURN CODE 



ST,EXSEND 
'3BSC OPEN 
ST 
TERM2 



OPEN 



ERROR: 



PRINT 
GO TO 

ERROR 
MOVE 

PRINT 
GO TO 



RETURN CODE 
TERMINATION 



RETURN CODE 

RETURN CODE 
TERMINATION 



WRITE ERROR 



ST,EXSEND 

'3DISK WRITE ERROR: • 

ST 

E,IOCB,ERROR=BSCERR 

IOCB2,ST 

I0CB3,4 

ST,X'1002' 

ST+2,C'XS' 

IX,IOCB,ERROR=BSCERR 

E,I'OCB,ERROR = BSCERR 

TERM1 



MOVE RETURN CODE 

PRINT RETURN CODE 
WRITE EOT (ABORT) 
POINT IOCB TO STATUS 
SET LENGTH TO 4 
SET UP STATUS MESSAGE 



WRITE 
WRITE 
GO TO 



STATUS 

EOT 

TERMINATION 



9,RM,0,P2=IOCB2,P3=IOCB3 



F'O 



P2=IOCB2 

P3=I0CB3 

RECORD 



IDENTIFIES 
IDENTIFIES 
LENGTH 



IOCB 

MSG 
MSG 



ADDRESS 
LENGTH 



DATA F ? 0' RECORD COUNT 

UEST TO SEND DATA SET 



EQU x 

DATA X f 1002 f 

DATA C f X' 

DATA C f R' 

DATA F'O' 

DATA CL8'MYDATA' 

DATA CL6' 

DATA D'O' 

DATA F'O' 

DATA F'3' 

EQU *-RM 



REQUEST 

BSC CNTRL CHARS (DLE STX) 
HEADER ID 

HEADER TYPE: REQUEST 

REQUEST TYPE: SEND 

DATA SET NAME: MYDATA 

VOLUME NAME: (IPL VOL) 

STARTING RECORD: NONE 

SEND TYPE: NORMAL 

BLOCKING FACTOR: 3 

LENGTH OF REQUEST 



o 

^J,/ 
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STATUS RECORD 

DATA 6F , 0» 



TSFN 
TL 



EQU 
EQU 



ST + 6 
*-ST 



AREA FOR STATUS RECORD 
10 BYTES FOR RECORD, 
1 BYTE FOR EXT, ROUNDED 
UP TO 6 WORDS 
STATUS FUNCTION 
STATUS RECORD LENGTH 



/On 



— DATA AND COUNT RECORD 
T DATA 387F f 0' 



AREA FOR 
4 BYTES 
768 BYTES 
1 BYTE 



DATA RECORD 
MESSAGE HEADER 
3 256-BYTE RECS 
ETX 



THTYPR 
TDATA 
TCCNT 
TL 



EQU DT+3 
EQU DT+4 
EQU DT+10 
EQU *-DT 
ENDPROG 
END 



773 BYTES TOTAL, 
TO 387 
RECORD TYPE 
DATA 
COUNT 
LENGTH 



ROUNDED 
WORDS 



UP 



y 
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ERROR HANDLING 
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This section describes the error handling procedures of the 
Remote Management Utility* as well as the procedures the host 
program should follow upon encountering an error. The error 
messages displayed by the utility are also described in this 



sect i on . 



Types of Errors 



As was discussed in the section "Remote Management Utility 
Interface" on page 207* the utility is comprised of two levels 
of communications protocol. Errors encountered during the 
transmission of these protocols by either the host or remote 
can be classified as follows: 

• Communications errors 

• Errors detected by the utility or the host program while a 
function is executing 

• Errors detected by the utility at any time 

If a communications error is encountered during a Remote Man- 
agement Utility session* an error message is written to the 
terminal which loaded the utility. If the function requested is 
running when the error occurs* the function is terminated imme- 
diately by the utility. The SEND* RECEIVE* and PAS5THRU func- 
tions could however remain executing* in that these functions 
require multiple message exchanges between the host and the 
remote* before the function is completed. If the error is 
recoverable, the utility sends the host a Status record fol- 
lowed by an EOT. If necessary* an EOT ("abort") will precede 
the Status record. After this sequence is completed* the host 
may then issue a new request. 

Errors detected by the utility or the host program while a 
function is executing include such errors as disk /diskette I/O 
errors during a SEND or RECEIVE operation. If the utility 
detects such an error* a Status record indicating the error 
condition is sent to the host* followed by an EOT* and the func- 
tion is terminated. If necessary* an EOT ("abort") will precede 
the Status record. After this sequence is completed the host 
may issue a new request. If the host program detects an error 
condition, it should terminate the function in the same 
sequence as the utility. However, the Status record the host 
sends the remote requires only the 4-byte header information of 
a Status record (RMHBSCC, RMHID, RMHTYP fields). 
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Errors detected by the utility at any time include: 

Short record Ctext length is less than four bytes) 

Header ID CRMHID field) is not "X" 

Invalid request 

LOAD of overlay failed 

EOT not sent by the host after a request 



These errors may occur any time the host sends a record to the 
utility. Nhen the utility detects any of these errors, the 
utility sends an EOT ("abort") if necessary, followed by a Sta- 
tus record. The RMSST field of the Status record will contain 
the appropriate error code. In addition, the RMSREQ field of 
the Status record will contain the type of request that was in 
execution at the time, or a "-1" if no request was executing. 

Figure 28 and Figure 29 on page 279 illustrate error handling 
on a SEND request. 



/4 \ 



Host Program Host 

(Utility sending data set) 

Read Continue - Data ACK* 



(At this point, Utility gets I/O 
error on READ to disk/diskette) 

Read Continue - Status ACK* 

RMHTYP='S» Status 
RMSREQ=0 SEND 
RMSFN=2 READ failed 

RMSST=Disk I/O return code 

Read Continue - EOT ACK* 



Remote 



TEXT 



TEXT 



EOT 



v.y 



Figure 28. Error Handling by the Remote Management Utility 
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Host Program 

(Utility sending data set) 

Read Continue - Data 

(At this point* host gets error 
processing data record) 

Write End - Abort 

Write Initial - Status 

RMHBSCC DATA X f 1002' 
RMHID DATA C»X' 
RMHTYP DATA C f S f 

Write End - EOT 



Host 



Remote 



ACK* > 

< TEXT 

EOT > 

ENQ > 

< ACK* 

TEXT > 

< ACK* 

EOT > 



Figure 2 9. Error Handling by the Host Program 



\7 



Error Messages 



This section describes the error messages returned when the 
Remote Management Utility encounters an error. These messages 
are written to the terminal that loaded the utility. 

$RMU ERROR 1 - INSUFFICIENT BUFFER. SIZE: nnnn 

The size of the buffer defined for use by the utility is less 
than the 512-byte minimum. The default 1024-byte buffer size 
has been modified incorrectly. 

$RMU ERROR 2 - COMMUNICATIONS OPEN FAILED, RETURN CODE: nnnn 

The OPEN of the BSC communications line failed. The return code 
is defined in the description of the BSC Access Method for the 
Event Driven Executive. 



Chapter 6. Remote Management Utility 



279 



$RMU ERROR 3 - COMMUNICATIONS CLOSE FAILED, RETURN CODE: nnnn 

The CLOSE of a BSC communications line failed. The return code \_/ 

is defined in the description of the BSC Access Method for the 
Event Driven Executive. 

$RMU ERROR 4 - COMMUNICATIONS I/O ERROR. 

I/O FUNCTION: aaaaaa 
RETURN CODE: nnnn 

A communications error has been detected by the utility. The 
I/O function ("aaaaaa") will indicate the type of request, and 
is one of the following: 

READ INITIAL 
READ CONTINUE 
WRITE EOT 
WRITE INITIAL 
WRITE EOT (ABORT) 
WRITE CONTINUE 

The return code is defined in the description of the BSC Access 
Method for the Event Driven Executive. 

$RMU ERROR 5 - LOAD OVERLAY FAILED, RETURN CODE: nnnn 
OVERLAY NUMBER: mmmm 

The utility attempted to load an overlay program via a LOAD f 

instruction, and the load failed. The return code is defined v r y 

for the LOAD instruction. 

$RMU ERROR 6 - OVERLAY FUNCTION MISSING. FUNCTION: nnnn 
OVERLAY NUMBER: mmmm 

The utility's function table defined a function as being con- 
tained within an overlay, but it was not. This error may occur 
if a user-written function is not added properly to the func- 
t i on tab le . 
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INSTALLATION 



The software requirements necessary to install the Event Driv- 
en Executive Remote Management Utility on a Series/1 are dis- 
tributed as part of the Event Driven Executive Version 2.0 
product. The section "Hardware Requirements" on page 207 
discusses the minimum hardware requirements. The host program, 
however » must be provided by the user. 

This section describes the modules which comprise the Remote 
Management Utility* system generation requirements* storage 
requirements, and the Remote Management Utility defaults and 
how they can be modified. 



Remote Management Utility Modules 



The utility consists of the following modules: 

$RMU 

$RMUPA 

CDR0V1 

CDR0V2 

CDR0V3 

CDR0V4 

CDR0V5 

CDROVCP 

CDRJP 

In addition, the $DISKUT3 utility module is required by the 
Remote Management Utility. 



System Generation Requirements 

The Remote Management Utility uses the Event Driven Executive 
BSC access method (BSCAM) and the BSC line protocol in communi- 




The INCLUDE statements required for binary synchronous commu- 
nications are as follows: 

INCLUDE BSCAM, XS2002 



INCLUDE BSCINIT,XS2002 
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If the PASSTHRU function is to be invoked by the host program* 

the following INCLUDE statement is required to provide the vir- 4r~~~x 



v 



tual terminal support of the Event Driven Executive*. 
INCLUDE IOSVIRT,XS2002 

No te : As discussed in the section "PASSTHRU Function" on page 
225, the names of the virtual terminals must be CDRVTA and 
CDRVTB. 

Refer to the System Gu i de for information on including modules 
at system generation. 

Upon meeting the system generation requirements previously 
discussed, the Remote Management Utility can be loaded for exe- 
cution via the $L operator command as follows: $L $RMU. 



Storage Requirements 

The storage requirements for the Remote Management Utility 
described in this section are in addition to the storage 
required by the Event Driven Executive supervisor /emulator and 
the supervisor/emulator's required device support programs and 
control blocks . 

The Remote Management Utility storage requirements are as fol- y y 

lows : 

• Maximum of 7K bytes plus buffer space for any function. 

• The storage required by the utility can be reduced from 7K 
bytes to 5K bytes. If the storage is reduced to 5K bytes, 
all functions except ALLOCATE and DELETE can be performed 
with a 2K byte savings. However, when the ALLOCATE and 
DELETE functions are invoked, the utility will momentarily 
require additional storage for the SDISKUT3 utility (which 
is approximately 4.5K). The storage will be obtained from 
the partition the Remote Management Utility is executing 
i n . 

• Storage required for loading other programs invoked 
through the EXEC, PASSTHRU, or SHUTDOWN functions is not 
considered storage required by the Remote Management Util- 
ity. 

Refer to the section "Modifying Defaults" on page 283 for 
details on modifying storage requirements. 
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Remote Management Utility Defaults 



This section describes the defaults and constants within the 
Remote Management Utility as distributed: 



Host system ID of "HOSTRMUX" 
Remote system ID of "REMTRMUX" 
BSC device address of X f 09 f 
Communications line is point-to-point 
Storage required is 7K for all functions 
Buffer size is 1024 bytes 



Modifying Defaults 






This section describes how the Remote Management Utility 
defaults can be modified to meet specific user programming 
requirements. The defaults can be modified via "patching" 
through use of the SDISKUT2 utility. Detailed information on 
the 5DISKUT2 utility can be found in Utilities* Operator Com- 
mands? Program Preparation? Messages and Codes . 
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Host ID 



The default host ID expected by the IDCHECK function is 
"HOSTRMUX". This ID may be modified by applying the patch to 
the address illustrated in the following example* where the ID 
is set to "HOSTSYSA". 






(Attention) 
> $L $DISKUT2 

USING VOLUME EDX002 

COMMANDC?) : PA $RMU 

$RMU IS A PROGRAM 

ADDRESS: 6B6 4 

CD)EC, (E)BCDIC OR (H)EX? E 

NOW IS: 
06B6 C8D6 E2E3 D9D4 E4E7 

ENTER DATA: HOSTSYSA 

NEW DATA: 
06B6 C8D6 E2E3 E2E8 E2C1 

OK? Y 

PATCH COMPLETE 

ANOTHER PATCH? N 

COMMANDC?): EN 



HOSTRMUX 



HOSTSYSA 






o 
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Remote ID 



o 



The default remote system ID returned on a successful IDCHECK 
function is "REMTRMUX". This ID may be modified by applying the 
patch to the address illustrated in the following example* 
where the ID is set to "REMTSYSA". 



o 



( Attent i on ) 
> $L $DISKUT2 

USING VOLUME EDX002 

COMMANDC?) : PA $RMU 

$RMU IS A PROGRAM 

ADDRESS: 6AE 4 

(D)EC, (E)BCDIC OR (H)EX? E 

NOW IS: 
06AE D9C5 D4E3 D9D4 E4E7 

ENTER DATA: REMTSYSA 

NEW DATA: 
06AE D9C5 D4E3 E2E8 E2C1 

OK? Y 

PATCH COMPLETE 

ANOTHER PATCH? N 

COMMANDC?): EN 



REMTRMUX 



|REMTSYSA| 
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BSC Device Address 



The default BSC device address defined in the utility is X * 9 ? . 
This device address may be modified by applying the patch to 
the address illustrated in the following example* where the 
address is set to X , 19 f . 






( Attent i on) 
> $L $DISKUT2 

USING VOLUME EDX002 

COMMANDC?) : PA $RMU 

$RMU IS A PROGRAM 

ADDRESS: 6C0 1 

(D)EC, (E)BCDIC OR (H)EX? H 

NOW IS: 
06C0 0009 

ENTER DATA: 0019 

NEW DATA: 



06C0 



0019 



OK? Y 

PATCH COMPLETE 

ANOTHER PATCH? N 

COMMANDC?): EN 



v ; y 
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Communications Line 



The utility is distributed to run on a binary synchronous 
communications point-to-point communications line* either 
leased or switched. If the utility is to be used as a tributary 
station on a multipoint line (TYPE=MT on the BSCLINE 
statement)* the patch to the address illustrated in the follow- 
ing example must be applied: 



( Attent i on ) 
> $1_ $DISKUT2 

USING VOLUME EDX002 

COMMANDC?) : PA $RMU 

$RMU IS A PROGRAM 

ADDRESS: 6D8 1 

(D)EC, (E)BCDIC OR (H)EX? H 

NOW IS: 
06D8 0000 

ENTER DATA: 0001 

NEW DATA: 
06D8 0001 

OK? Y 

PATCH COMPLETE 

ANOTHER PATCH? N 

COMMANDC?): EN 
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Storage 



As was discussed in the section "Storage Requirements" on page 
282> storage may be reduced from 7K to 5K. This modification 
can be done by applying the patch ("CDRJP") to the address 
illustrated in the following example. 






( Attent i on ) 
> $L $DISKUT2 

USING VOLUME EDX002 

COMMANDC?) : PA $RMU 

$RMU IS A PROGRAM 

ADDRESS: 102 4 

(D)EC, (E)BCDIC OR (H)EX? E 

NOW IS: 
0102 05BC4 C9E2 D2E4 E3F3 

ENTER DATA: CDRJP 

NEW DATA: 
0102 C3C4 D9D1 D740 4040 

OK? Y 

PATCH COMPLETE 

ANOTHER PATCH? N 

COMMANDC?): EN 



|$DISKUT3| 



CDRJP 



vy 
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Buffer Size 



The default buffer size defined in the utility is 1024 bytes. 
This buffer size may be modified by applying the patch to the 
address illustrated in the following example (nnnn is the buff- 
er size). 



( Attent i on ) 
> $L $DISKUT2 

USING VOLUME EDX002 

COMMANDC?): SS $RMU nnnn 

OLD STORAGE SIZE WAS 1024 
OK TO CONTINUE? Y 

COMMANDC?): EN 



f*\ 



Buffer sizes may be modified to allow different sizes of block- 
ing. The following table defines maximum blocking factors and 
sizes for various buffer sizes: 







Max Block 


ing 


Max Block 


ing 


Max Block 






Factor - 




Factor - 




Size - 


Buffer 




Standard 




Source 




Passthru 


Si ze 




Data Set 




Data Set 




Data 


512 (min) 




1 




3 




248 


768 




2 




6 




504 


1024 (defau 


It) 


3 




9 




760 


2048 




7 




22 




1784 


4096 




15 




47 




3832 


32512 (max) 




126 




403 




32248 



The calculations required to determine the blocking factor for 
the different data set types will be discussed next. The buffer 
size chosen should be a multiple of 256 bytes (the Event Driven 
Executive rounds up to the next multiple of 256 bytes). 
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Standard Data Set 



To determine the blocking factor for a standard data set* use 
the following calculation: 

MSTD = (BUFF - 6) / 256 

where BUFF = buffer size (bytes) 
MSTD = blocking factor 

Note : The remainder is discarded. The value "6" accounts for a 
4-byte header* 1-byte ETX, and 1 byte for word alignment. 



Source Data Set 



To determine the blocking factor for a source data set, use the 
following calculation: 

MSRC = (BUFF - 262) / 80 

where BUFF = buffer size (bytes) 
MSRC = blocking factor 



Note : The remainder is discarded. The value "262" accounts for 
a 4-byte header, 1-byte ETX, 1 byte for word alignment, and 256 
bytes in which the disk /diskette record is read or written. 



vy 



If space is available for more than one disk/diskette record in 
the buffer, the utility will read or write as many records as 
possible at a time to increase the efficiency of disk/diskette 
I/O. 

For example, if the buffer size is 1024 bytes and the blocking 
factor is 6, the utility will read or write two 256-byte 
records at a t i me . 
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Passthru Data 



To calculate the blocking factor for Passthru data* 
following calculation: 



use the 



MPSD = BUFF - 264 



where BUFF 
MPSD 



buffer size (bytes) 

Passthru data size 

(this is the size of the data segment of 

the Passthru "Text or PF Key" record) 



Note : The value "264" accounts for a 6-byte header* 1-byte ETX, 
1 byte for word alignment, and 256 bytes for a TEXT statement 
for I/O to the virtual channel. 






Chapter 6. Remote Management Utility 



291 



CDRRM Equate Listing 






* 
* 

RM 

RMH 

RMHBSCC 

RMHID 

RMHIDX 

RMHTYP 

RMHTYPR 

RMHTYPS 

RMHTYPC 

RMHTYPD 

RMHTYPP 

* 

RMHX 

* 

x 

RMREQ 

RMREQSND 

RMREQRCV 

RMREQALC 

RMREQDEL 

RMREQDMP 

RMREQWRP 

RMREQIDC 

RMREQSHT 

RMREQEXC 

RMREQPST 

* 

RMRX 

x 

x 

x 

RMSDSN 

RMSVOL 

RMSSTR 

x 

RMSTYP 

RMSTYPN 

x 

RMSTYPS 

x 

RMSBLK 



EQU 
EQU 
EQU 
EQU 
EQU 
EQU 
EQU 
EQU 
EQU 
EQU 
EQU 

EQU 



EQU 
EQU 
EQU 
EQU 
EQU 
EQU 
EQU 
EQU 
EQU 
EQU 
EQU 

EQU 



EQU 
EQU 
EQU 

EQU 
EQU 

EQU 

EQU 



REMOTE MANAGEMENT UTILITY 
RECORD DESCRIPTION 

HEADER 
f 1002 f BSC CONTROL CHARS (DLE STX) 
f X' HEADER ID 



CL1 



'R 
»S 

f C 
»D 
' P 



HEADER TYPE 


R 


REQUEST 


S 


STATUS 


C 


COUNT 


D 


DATA 


P 


PASSTHRU 



EXTENSION AFTER HEADER 



RECORD TYPE: REQUEST 



RMHX+0 F 



1 

2 

3 

5 
6 

7 
9 
12 

RMHX+2 



REQUEST TYPE 




1 
2 
3 

5 
6 

7 
9 
12 



SEND 

RECEIVE 

ALLOCATE 

DELETE 

DUMP 

WRAP 

IDCHECK 

SHUTDOWN 

EXEC 

PASSTHRU 



y 



D 



RMRX+0 
RMRX+8 
RMRX+14 

RMRX+18 




RMRX+20 F 



REQUEST EXTENSION 

EXTENSION: SEND 

CL8 DATA SET NAME 

CL6 VOLUME NAME (BLANK=IPL VOLUME) 



STARTING RECORD OF DATA SET 
(ONLY SECOND HALF USED) 
TYPE OF SEND 

NORMAL (256-BYTE RECORDS, 
POSSIBLY BLOCKED) 

1 SOURCE (80-BYTE RECORDS, 
POSSIBLY BLOCKED) 

BLOCKING FACTOR (0 OR l=NONE) 



Figure 30. CDRRM Copy Code (Part 1 of 6) 
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* 

RMRDSN 

RMRVOL 

RMRSTR 

x 

RMRTYP 

RMRTYPN 

x 

RMRTYPS 

x 

RMRBLK 

x 

x 

x 

RMADSN 

RMAVOL 

RMANREC 

x 

RMADST 

RMADSTU 

RMADSTD 

RMADSTP 

x 

x 

x 

RMDDSN 

RMDVOL 

x 

x 

x 

RMDPDSN 

RMDPVOL 

x 

RMDPPTN 

x 

x 

x 

x 

* 

RMWTXT 



EQU 
EQU 
EQU 

EQU 
EQU 

EQU 

EQU 



EQU 
EQU 
EQU 

EQU 
EQU 
EQU 
EQU 



EQU 
EQU 



EQU 
EQU 

EQU 



EXTENSION: 



RECEIVE 



D 



RMRX+0 
RMRX+8 
RMRX+14 

RMRX+18 




RMRX+20 F 



CL8 DATA SET NAME 

CL6 VOLUME NAME (BLANK=IPL VOLUME) 



STARTING RECORD OF DATA SET 
(ONLY SECOND HALF USED) 
TYPE OF RECEIVE 

NORMAL (256-BYTE RECORDS, 
POSSIBLY BLOCKED) 

1 SOURCE (80-BYTE RECORDS, 
POSSIBLY BLOCKED) 

BLOCKING FACTOR (0 OR 1=N0NE) 



EXTENSION: 



ALLOCATE 



RMRX+O 
RMRX+8 
RMRX+14 

RMRX+18 



1 

3 



CL8 DATA SET NAME 

CL6 VOLUME NAME (BLANK=IPL VOLUME) 

D NUMBER OF 256-BYTE RECORDS 

(ONLY SECOND HALF USED) 
F DATA SET TYPE 

UNDEFINED 

1 DATA 

3 PROGRAM 



EXTENSION: 



DELETE 



RMRX+O CL8 DATA SET NAME 

RMRX+8 CL6 VOLUME NAME (BLANK=IPL VOLUME) 



EXTENSION: 



DUMP 



RMRX+O 
RMRX+8 



CL8 DATA SET NAME 

CL6 VOLUME NAME (BLANK=IPL VOLUME) 



H 
RMRX+15 H 



EQU 



(UNUSED) 

PARTITION NUMBER 
-1 REMOTE MANAGEMENT 
UTILITY PARTITION 
1-8 SPECIFIC PARTITION 



EXTENSION: WRAP 
RMRX+O C WRAP TEXT (MAY BE ANY LENGTH) 



Figure 31. CDRRM Copy Code (Part 2 of 6) 
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* 

X 

RMICHK 

* 

* 

* 

* 

RMSDFLG 

RMSDFLGX 

RMSDFLGL 

RMSDPTN 

* 

* 

* 

* 

RMSDPGM 

RMSDVOL 

RMSDLFS 

RMSDPRM* 

RMSDPRM 

RMSDDS# 

x 

RMSDDS 

x 

x 

x 

x 

x 

RMXFLG 

RMXFLGL 

RMXFLGW 

RMXPTN 

x 

x 

x 

x 

RMXPGM 

RMXVOL 

RMXLFS 

RMXPRM* 

RMXPRM 

RMXDS* 

x 

RMXDS 

x 



EXTENSION: IDCHECK 



EQU 



EQU 
EQU 
EQU 
EQU 



EQU 
EQU 
EQU 
EQU 
EQU 
EQU 

EQU 



EQU 
EQU 
EQU 
EQU 



EQU 
EQU 
EQU 
EQU 
EQU 
EQU 

EQU 



RMRX+O CL8 ID OF HOST 



RMRX+2 

x'so 1 

X'AO' 
RMRX+3 



RMRX+4 

RMRX+12 

RMRX+18 

RMRX+20 

RMRX+22 

RMRX+24 



RMRX+2 
X'^O 1 
X f 20 T 
RMRX+3 



EXTENSION: SHUTDOWN 



CL8 

CL6 

F 

F 

NF 

F 



RMRX+26 NF 



(UNUS 

FLAG 

PRO 

LOG 

PARTI 

-1 



1-8 
PROGR 
VOLUM 
FREE 
NUMBE 
PARAM 
NUMBE 
PASSE 
DATA 
UME; 



ED) 

GRAM 
MSG = Y 
TION 
REMO 
UTIL 
ANY 
SPEC 
AM (D 
E NAM 
SPACE 
R OF 
ETER 
R OF 
D 

SET N 
BLANK 



EXTENSION: 



TO BE EXECUTED 

ES 

NUMBER 

TE MANAGEMENT 

ITY PARTITION 

PARTITION 

IFIC PARTITION 

ATA SET NAME) 

E (BLANK=IPL VOLUME) 

PASSED TO PROGRAM 
PARAMETER WORDS 
WORDS 
DATA SET NAMES 

AMES (DATA SET, VOL- 
VOLUME=IPL VOLUME) 

EXEC 



RMRX+4 CL8 

RMRX+12 CL6 

RMRX+18 F 

RMRX+20 F 

RMRX+22 NF 

RMRX+24 F 

RMRX+26 NF 



(UNUSED) 
FLAG 

LOGMSG=YES 

WAIT=YES 
PARTITION NUMBER 
-1 REMOTE MANAGEMENT 
UTILITY PARTITION 

ANY PARTITION 

1-8 SPECIFIC PARTITION 
PROGRAM (DATA SET NAME) 
VOLUME NAME (BLANK=IPL VOLUME) 
FREE SPACE PASSED TO PROGRAM 
NUMBER OF PARAMETER WORDS 
PARAMETER WORDS (VARIABLE) 
NUMBER OF DATA SET NAMES 
PASSED 

DATA SET NAMES (DATA SET, VOL- 
UME; BLANK VOLUME=IPL VOLUME) 



V_y 



Figure 32. CDRRM Copy Code (Part 3 of 6) 
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* 

* 

RMPRBLK 

* 

* 

* 

* 

RMPRFLG 

RMPRPTN 

* 

* 

* 

RMPRPGM 

* 

RMPRVOL 

RMPRLFS 

RMPRPRM* 

RMPRPRM 

RMPRDS* 

* 

RMPRDS 

* 

* 

RMSREQ 
RMSFN 
RMSFNOK 
* 

* 

RMSFNID 

RMSFNBF 

* 

RMSFNSHR 

* 

RMSFNHIH 

RMSFNHID 

* 

RMSFNRQX 

RMSFNREQ 

RMSFNRQS 

* 

RMSFNSRT 

RMSFNBLF 

RMSFNIM 



EXTENSION: 



PASSTHRU 



EQU 



EQU 
EQU 



EQU 

EQU 
EQU 
EQU 
EQU 
EQU 

EQU 



EQU 
EQU 
EQU 



EQU 
EQU 

EQU 

EQU 
EQU 

EQU 
EQU 
EQU 

EQU 
EQU 
EQU 



RMRX+0 



RMRX+2 
RMRX+3 



RMRX+12 
RMRX+18 
RMRX+20 
RMRX+22 
RMRX+24 

RMRX+26 



4 
5 

6 

7 
8 

9 

10 

11 



BLOCKING FOR RECORDS FROM 
REMOTE 



OTHER 



FL 

PA 



RMRX+4 CL8 



CL6 

F 

F 

F 

F 

CL8 
CL6 



PR 
BL 
VO 
FR 
NU 
PA 
NU 
PA 
DA 
UM 



AG (U 
RTITI 
1 R 
U 
A 
1-8 S 
OGRAM 
ANK F 
LUME 
EE SP 
MBER 
RAMET 
MBER 
SSED 
TA SE 
E; BL 



NONE 
LARG 
CAN 
NUSED) 
ON NUM 
EMOTE 
TILITY 
NY PAR 
PECIFI 
(DATA 
OR EDX 
NAME ( 
ACE PA 
OF PAR 
ER WOR 
OF DAT 



EST BLOCK 
RECEIVE 



HOST 



BER 
MANAGEMENT 

PARTITION 
TITION 
C PARTITION 

SET NAME) OR 

SUPERVISOR 
BLANK=IPL VOLUME) 
SSED TO PROGRAM 
AMETER WORDS 
DS (VARIABLE) 
A SET NAMES 



T NAMES (DATA SET, VOL- 
ANK VOLUME=IPL VOLUME) 



RECORD TYPE: STATUS 



RMRX+0 F 
RMRX+2 F 
-1 



REQUEST TYPE 
FUNCTION 

-l ok; request 



SUCCESSFUL 



I - 20: REMOTE MANAGEMENT 

UTILITY FUNCTION 

1 IDCHECK FAILED 

2 BUFFER AREA TOO SMALL 

FOR RECORD 

3 SHORT RECORD (LESS THAN 

4 BYTES) 

4 HEADER ID IS f H f (INVALID) 

5 INVALID HEADER ID 

(NOT ? X f OR 'H') 

6 REQUEST EXPECTED 

7 INVALID REQUEST 

8 REQUEST SHORT (MISSING 

INFORMATION) 

9 INVALID SEND/RECEIVE TYPE 
10 INVALID BLOCKING FACTOR 

II INVALID MESSAGE RECEIVED 

DURING REQUEST 



Figure 33. CDRRM Copy Code (Part 4 of 6) 
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RMSF 

x 

RMSF 

x 

RMSF 

x 

RMSF 

x 

RMSF 

x 

x 

x 

x 

RMSF 

x 

RMSF 

RMSF 
RMSF 
RMSF 
RMSF 
x 

x 

RMSF 

RMSF 

RMSF 

RMSF 

x 

x 

RMSF 

x 

RMSS 

RMSX 
x 

RMSR 



NPD 

NDPN 

NRQR 

NEOT 

NVTB 



NR 

NW 

NL 

NLFP 
NBIO 
NVTP 



NAD 
NOPN 
NSED 
NLDP 



NOFM 

T 



EQU 
EQU 
EQU 
EQU 
EQU 



EQU 

EQU 

EQU 
EQU 
EQU 
EQU 



EQU 
EQU 
EQU 
EQU 



ID 



EQU 
EQU 

EQU 
EQU 



12 
13 
14 
15 
16 



21 

22 

24 
25 
26 
27 



31 
32 
33 
34 



41 
RMRX+4 

RMRX+6 



12 INVALID PASSTHRU RECORD 

TYPE 

13 INVALID DUMP PARTITION 

NUMBER 

14 REQUEST RECEIVED WHILE 

ANOTHER RUNNING 

15 EOT EXPECTED AND NOT 

RECEIVED 

16 VIRTUAL TERMINAL BUSY 

21 - 30: EVENT DRIVEN 

EXECUTIVE FUNCTION (RMSST 
CONTAINS RETURN CODE) 

21 READ DISK/DISKETTE 

FAILED 

22 WRITE DISK/DISKETTE 

FAILED 

24 LOAD FAILED 

25 LOAD OF OVERLAY FAILED 

26 BSC I/O FAILURE 

27 PRINTEXT FAILED FOR 

VIRTUAL TERMINAL 

31 - 40: EVENT DRIVEN 

EXECUTIVE ADDITIONAL FUNCTION 
(RMSST CONTAINS RETURN CODE 
FROM SDISKUT3 FOR CODES 
31-33) 

31 ALLOCATE/DELETE FAILED 

32 OPEN FAILED 

33 SETEOD FAILED 

34 PARAMETERS TO BUILD LOAD 
INSTRUCTIONS ARE INVALID 

41 - 50: REMOTE MANAGEMENT 
UTILITY ERROR 

41 OVERLAY FUNCTION MISSING 

STATUS OF FAILING FUNCTION 
(CONTAINS RETURN CODE IF 
INDICATED BY RMSFN) 
STATUS EXTENSION 



EXTENSION: IDCHECK STATUS 
RMSX+0 CL8 ID OF REMOTE SYSTEM 



V.V 



Figure 34. CDRRM Copy Code (Part 5 of 6) 
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* RECORD TYPE: COUNT 

x 

x 

RMCREQ EQU RMHX+0 REQUEST TYPE 

RMCFLG EQU RMHX+2 F FLAG 

RMCFLGPD EQU X»8000 f PADDING OCCURED 

RMCCNT EQU RMHX+4 D COUNT (NUMBER LOGICAL RECORDS) 

RMCL EQU RMHX+8 LENGTH OF COUNT MESSAGE 

x 

x RECORD TYPE: DATA 

x 

RMDDATA EQU RMHX+0 C DATA (VARIABLE LENGTH) 

x 

x RECORD TYPE: PASSTHRU 

x 

RMPTYP EQU RMHX+0 F PASSTHRU TYPE 

RMPTYPTX EQU 1 1 TEXT OR PF KEY 

RMPTYPRD EQU 2 2 REQUEST FOR DATA 

RMPTYPPE EQU 3 3 PROGRAM END (DISCONNECT) 

RMPTYPND EQU 4 A NO DATA 

RMPX EQU RMHX+2 PASSTHRU EXTENSION 

x 

x EXTENSION: TEXT OR PF KEY 

x 

RMPST EQU RMPX+0 F STATUS OF LTERM MESSAGE 

RMPTXTL EQU RMPX+2 F TEXT LENGTH (BYTES) OR -1 IF 

x PF KEY 

RMPTXT EQU RMPX+4 C TEXT (VARIABLE SIZE) IF LENGTH 

x IS NOT -1 

x 

RMPPF EQU RMPX+4 F PK KEY NUMBER (IF LENGTH IS -1) 

x (THESE FIELDS MAY BE REPEATED 

x FOR INPUT TO HOST IF BLOCKING 

x IS REQUESTED. IF "RMPTXTL" IS 

x AN ODD NUMBER, ONE BYTE OF 

x FILLER FOLLOWS "RMPTXT".) 



Figure 35. CDRRM Copy Code (Part 6 of 6) 
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CHAPTER 7. GRAPHICS 






General Description 



The graphics instructions* used with the terminal support 
described in this book, provide a tool for the development of 
graphics applications. They can aid in the preparation of 
graphic messages, allow interactive input, and draw curves on a 
d i splay termi nal . 

These instructions are only valid for ASCII terminals having a 
point-to-point vector graphics capability, and compatible with 
the coordinate conversion algorithm described in Internal 
Pes i gn for graphics mode control characters. The function of 
the various ASCII control characters used by a terminal are 
described in the appropriate device manual. Such terminals may 
be connected to the Series/1 via the #7850 Teletypewriter 
adapter . 

Seven graphic instructions are supplied. They are used in the 
same manner as other instructions, except that the supporting 
code will be included in the user's program, rather than in the 
supervisor. If all instructions are coded in a program, this 
code requires approximately 1500 bytes of storage. 




Use of the graphics instructions requires that the user's 
object program be processed by the linkage editor program, 
$LINK, in order to include the graphics functions which are 
supplied as object modules. Refer to the Utilities, Operator 
Commands, Program Preparation, Messages and Codes for the 
description of the autocall option of SLINK, and for informa- 
tion on the use of the " AUT0 = $ AUTO , ASMLIB" option of $LINK. 

The following is a list of the graphics instructions provided 
by the Event Driven Executive. These instructions are 
described in detail in the Language Reference . 

CONCAT - Concatenate two data strings 

GIN - Unsealed cursor coordinate inputs 

PLOTCB - Defines graphics data area 

PLOTGIN - Scaled cursor coodinate inputs 

SCREEN - Converts x,y coordinates to text string 

XYPLOT - Draws a x,y curve on a display 

YTPLOT - Plots Y points on a display 
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Additionally* three graphic utilities are provided. They are 
SDIUTIL, $DICOMP, and $DIINTR. Refer to the Uti lities* 
Operator Commands* Program Preparation* Messages and Codes for 
a descr i pt i on . 



Hardware Considerations 



Terminal support is provided for the Tektronix 4010 series of 
display terminals equipped the General Purpose Parallel Inter- 
face (Tektronix Custom Feature Number CM021-0109-03 with cable 
CM012-0541-00 ) or other digital I/O devices having equivalent 
hardware interfaces. The software provides addressing logic 
such that up to eight terminals may be shared on one digital 
input group and one digital output group* with one process 
interrupt bit for each terminal. 

The parallel interface is intended to connect directly to the 
intergrated digital input /output feature (#1560). This inter- 
face consists of a driver and a receiver card* each of which has 
several selectable options. These options allow the user to 
customize the interface to his requirements. The user must 
refer to the manufacturer's manuals for detailed installation 
procedures . 

The following description is intended only to supplement those 
manuals and guide the user when using the Event Driven Execu- 
tive terminal support on the Series/1. The following Tektronix 
4010 Series display terminal options should be selected: 



Rece i ver Card 

INTR (interrupt) 
ADDRESS 



PROG 

000(0)-111(7) to match 
TERMINAL definition 



PERM ADD 

PARITY 

DELAY 

LOGIC SENSE (3) 
HANDSHAKE 
CONTROL 
DATA 



OFF 

EVEN 

3.5-18 (depends on distance) 

Set all to LOW 



THRESHOLD 
MASTER OPTION 



+2 volts 
None 
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Dr i ver Card 

LOGIC SENSE (4) 
STATUS 
HANDSHAKE 
INTERRUPT 
DATA 

INTERRUPT CHANNEL 

AUX TSUP 



Set as 

HIGH 

HIGH 

LOW 

HIGH 



Use INTR 
OUT 



shown 



ECHO 



PARITY 



OUT 

EVEN, BIT 8 IN 
AB to A, CD to D 



^ 



Before the terminal may be used with the computer, some other 
considerations are necessary. As noted above, the common 
interrupt line (INTR) should be used. It is recommended that 
the user select the interrupt line (0 - 7) corresponding to the 
terminal address. If fewer than eight terminals are attached, 
some of the interrupt lines will not be used. All digital input 
and process interrupt lines must be terminated for proper oper- 
ation. If only one terminal is used, the DI terminations may 
have been installed by the manufacturer. With multiple termi- 
nals, all DI lines and PI lines should be terminated at the 
computer. A 1000-ohm resistor across the DI and PI inputs is 
recommended. The BAUD Rate Selection Switch should be in the 
"stand by" position and the J261 Connector Switch set to 
"interface". Both of these switches are on the Tektronix 4010 
series display terminals. 

When the terminal is powered on, it may be necessary to "reset" 
the terminal. The procedure is to put the LOCAL/LINE switch in 
LOCAL, back to LINE, and simultaneously press the SHIFT and 
RESET keys. If the terminal does not respond during normal 
operation, it may be necessary to perform this sequence to 
reset the internal circuits. 

Since all input /output is done with upper case ASCII character 
codes, the TTY LOCK key should be activated when using the ter- 
minal with the Series/1. 

The last items which merit special discussion are the GIN mode 
and the PAGE FULL BREAK strap options on the terminal control 
card (TC-2). The user must press the appropriate key followed 
by carriage return (CR). The PAGE FULL BREAK termination may be 
set to either OUT or IN, depending on the user's preference. If 
it is IN, the terminal will always stop when a full page condi- 
tion is reached. The user must press the PAGE RESET key in order 
to continue. If it is OUT, the terminal will automatically go 
to the home address and continue printing without erasing the 
screen . 
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APPENDIX A. CODE TYPES 













Eight-bit 




2741 












data interchange 


2741 


PTTCl 










ASCII 


EBASC* 


PTTC/EBCD 


Correspondence 


Decimal 


Hex 


Binary 


EBCDIC 


(see Note 1) 


(see Note 2) 


EBCD 


CRSP 





00 


0000 0000 


NUL 


NUL 


NUL (even) 






1 


01 


0001 


SOH 


SOH 


NUL (odd) 


space 


space 


2 


02 


0010 


STX 


STX 


@ (odd) 


1 


1,1 


3 


03 


0011 


ETX 


ETX 


@ (even) 






4 


04 


0100 


PF 


EOT 


space (odd) 


2 


2 


5 


05 


0101 


HT 


ENQ 


space (even) 






6 


06 


0110 


LC 


ACK 


' (even) 






7 


07 


0111 


DEL 


BEL 


' (odd) 


3 




8 


08 


1000 




BS 


DLE (odd) 


4 


5 


9 


09 


1001 


RLF 


HT 


DLE (even) 






10 


0A 


1010 


SMM 


LF 


P (even) 






11 


OB 


1011 


VT 


VT 


P (odd) 


5 


7 


12 


OC 


1100 


FF 


FF 


(even) 






13 


OD 


1101 


CR 


CR 


(odd) 


6 


6 


14 


OE 


1110 


SO 


SO 


p (odd) 


7 


8 


15 


OF 


1111 


SI 


SI 


p (even) 






16 


10 


0001 0000 


DLE 


DLE 


BS (odd) 


8 


4 


17 


11 


0001 


DC1 


DC1 


BS (even) 






18 


12 


0010 


DC2 


DC2 


H (even) 






19 


13 


0011 


TM 


DC3 


H (odd) 


9 





20 


14 


0100 


RES 


DC4 


( (even) 






21 


15 


0101 


NL 


NAK 


( (odd) 





Z 


22 


16 


0110 


BS 


SYN 


h (odd) 


® (EOA) 


® (EOA) ,9 


23 


17 


0111 


IL 


ETB 


h (even) 






24 


18 


1000 


CAN 


CAN 


CAN (even) 






25 


19 


1001 


EM 


EM 


CAN (odd) 






26 


1A 


1010 


CC 


SUB 


X (even) 


RS 


RS 


27 


IB 


1011 


CU1 


ESC 


X (odd) 






28 


1C 


1100 


IFS 


FS 


8 (odd) 


upper case 


upper case 


29 


ID 


1101 


IGS 


GS 


8 (even) 




X 


30 


IE 


1110 


IRS 


RS 


x (even) 






31 


IF 


1111 


IUS 


US 


x (odd) 


© (EOT) 


© (EOT) 


32 


20 


0010 0000 


DS 


space 


EOT (odd) 


@ 


t 


33 


21 


0001 


SOS 


t 


EOT (even) 






34 


22 


0010 


FS 


" 


D (even) 






35 


23 


0011 




# 


D (odd) 


/ 


X 


36 


24 


0100 


BYP 


$ 


$ (even) 






37 


25 


0101 


LF 


% 


$ (odd) 


s 


n 


38 


26 


0110 


ETB 


& 


d (odd) 


t 


u 


39 


27 


0111 


ESC 


' 


d (even) 






40 


28 


1000 




( 


DC4 (even) 






41 


29 


1001 




) 


DC4 (odd) 


u 


e 


42 


2A 


1010 


SM 


* 


T (odd) 


V 


d 


43 


2B 


1011 


CU2 


+ 


T (even) 






44 


2C 


1100 




, 


4 (even) 


w 


k 


45 


2D 


1101 


ENQ 


- 


4 (odd) 






46 


2E 


1110 


ACK 




t (even) 






47 


2F 


1111 


BEL 


/ 


t (odd) 


X 


c 


48 


30 


0011 0000 







form feed (even) 






49 


31 


0001 




1 


form feed (odd) 


y 


1 


50 


32 


0010 


SYN 


2 


L (odd) 


z 


h 



*The no-parity TWX code for any given character is the code that has the rightmost bit position off. The parity of the code is 
indicated in the parenthesis (either odd or even). 
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Eight-bit 




2741 












data interchange 


2741 


PTTCl 










ASCII 


EBASC* 


PTTC/EBCD 


Correspondence 


Decimal 


Hex 


Binary 


EBCDIC 


(see Note 1) 


(see Note 2) 


EBCD 


CRSP 


51 


33 


0011 




3 


L (even) 






52 


34 


0100 


PN 


4 


, (odd) 






53 


35 


0101 


RS 


5 


, (even) 






54 


36 


0110 


uc 


6 


1 (even) 


SOA 




55 


37 


0011 0111 


EOT 


7 


1 (odd) 


(S) (SOA), comma 


b 


56 


38 


1000 




8 


FS (odd) 






57 


39 


1001 




9 


FS (even) 






58 


3A 


1010 






\ (even) 






59 


3B 


1011 


CU3 


; 


\ (odd) 


index 


index 


60 


3C 


1100 


DC4 


< 


< (even) 






61 


3D 


1101 


NAK 


= 


< (odd) 


® (EOB) 




62 


3E 


1110 




> 


1 (odd) 






63 


3F 


1111 


SUB 


? 


I (even) 






64 


40 


0100 0000 


space 


@ 


EOA (odd) 


® (NAK), - 


! 


65 


41 


0001 




A 


EOA (even) 






66 


42 


001 




B 


B (even) 






67 


43 


0011 




C 


B (odd) 


i 


m 


68 


44 


0100 




D 


" (even) 






69 


45 


0101 




E 


" (odd) 


k 




70 


46 


0110 




F 


b (odd) 


1 


V 


71 


47 


0111 




G 


b (even) 






72 


48 


1000 




H 


DC 2 (even) 






73 


49 


1001 




I 


DC2 (odd) 


m 


' 


74 


4A 


1010 


* 


J 


R (odd) 


n 


r 


75 


4B 


1011 




K 


R (even) 






76 


4C 


1100 


< 


L 


2 (odd) 


o 


i 


77 


4D 


1101 


( 


M 


2 (even) 






78 


4E 


1110 


+ 


N 


r (even) 






79 


4F 


mi 


] 





r (odd) 


P 


a 


80 


50 


0101 0000 


& 


P 


line feed (even) 






81 


51 


0001 




Q 


line feed (odd) 


q 


o 


82 


52 


0010 




R 


J (odd) 


r 


s 


83 


53 


0011 




S 


J (even) 






84 


54 


0100 




T 


* (odd) 






85 


55 


0101 




U 


* (even) 






86 


56 


0110 




V 


; (even) 






87 


57 


0111 




w 


; (odd) 


$ 


w 


88 


58 


1000 




X 


SUB (odd) 






89 


59 


1001 




Y 


SUB (even) 






90 


5A 


1010 


i 


z 


Z (even) 






91 


5B 


1011 


$ 


[ 


Z (odd) 


CRLF 


CRLF 


92 


5C 


1100 


* 


\ 


: (even) 






93 


5D 


1101 


) 


] 


: (odd) 


backspace 


backspace 


94 


5E 


1110 


; 


A 


z (odd) 


idle 


idle 


95 


5F 


mi 


— i 





z (even) 






96 


60 


0110 0000 


- 


- 


ACK (even) 






97 


61 


0001 


/ 


a 


ACK (odd) 


& 


J 


98 


62 


i 0010 




b 


F (odd) 


a 


g 


99 


63 


0011 




c 


F (even) 






100 


64 


0100 




d 


& (odd) 


b 




101 


65 


0101 




e 


& (even) 






102 


66 


0110 




f 


f (even) 






103 


67 


0111 




g 


f(odd) 


c 


f 


104 


68 


1000 




h 


SYN (odd) 


d 


P 


105 


69 


1001 




i 


SYN (even) 






106 


6A 


1010 


; 


J 


V (even) 






107 


6B 


1011 


, 


k 


V (odd) 


e 




108 


6C 


1100 


% 


1 


6 (even) 







■> 



v..y 
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Eight-bit 




2741 












data interchange 


2741 


PTTCl 










ASCII 


EBASC* 


PTTC/EBCD 


Correspondence 


Decimal 


Hex 


Binary 


EBCDIC 


(see Note 1) 


(see Note 2) 


EBCD 


CRSP 


109 


6D 


1101 




m 


6 (odd) 


f 


q 


110 


6E 


1110 


> 


n 


v (odd) 


g 


comma 


111 


6F 


1111 


7 


o 


v (even) 






112 


70 


0111 0000 




P 


shift out (even) 


h 


/ 


113 


71 


0001 




q 


shift out (odd) 






114 


72 


0010 




r 


N (even) 






115 


73 


0011 




s 


N (odd) 


i 


y 


116 


74 


0100 




t 


. (even) 






117 


75 


0101 




u 


. (odd) 






118 


76 


0110 




V 


n (odd) 


® (YAK), period 




119 


77 


0111 




w 


n (even) 






120 


78 


1000 




X 


RS (even) 






121 


79 


1001 




y 


RS (odd) 






122 


7A 


1010 




z 


t (odd) 


horiz tab 


tab 


123 


7B 


1011 


# 


I 


t (even) 






124 


7C 


1100 


@ 


1 


> (odd) 


lower case 


lower case 


125 


7D 


1101 


' 


i 


> (even) 






126 


7E 


1110 


= 




'V/ (even) 






127 


7F 


1111 


" 


DEL 


'v (odd) 


delete 




128 


80 


1000 0000 






SOM (odd) 






129 


81 


0001 


a 




SOM (even) 


space 


space 


130 


82 


0010 


b 




A (even) 


= 


±,[ 


131 


83 


0011 


c 




A (odd) 






132 


84 


0100 


d 




! (even) 


< 


@ 


133 


85 


0101 


e 




! (odd) 






134 


86 


0110 


f 




a (odd) 






135 


87 


0111 


g 




a (even) 


; 


# 


136 


88 


1000 


h 




X-ON (even) 




% 


137 


89 


1001 


i 




X-ON (odd) 






138 


8A 


1010 






Q (odd) 






139 


8B 


1011 






Q (even) 


% 


& 


140 


8C 


1100 






1 (odd) 






141 


8D 


1101 






1 (even) 


' 


* 


142 


8E 


1110 






q (even) 


> 


* 


143 


8F 


1111 






q (odd) 






144 


90 


1001 0000 






horiz tab (even) 


* 


$ 


145 


91 


0001 


J 




horiz tab (odd) 






146 


92 


0010 


k 




I (odd) 






147 


93 


0011 


1 




I (odd) 


( 


) 


148 


94 


0100 


m 




) (odd) 






149 


95 


0101 


n 




) (odd) 


) 


Z 


150 


96 


0110 


o 




i (even) 


D (EOA)," 


( 


151 


97 


0111 


P 




i (odd) 






152 


98 


1000 


q 




EM (odd) 






153 


99 


1001 


r 




EM (even) 






154 


9A 


1010 






Y (even) 






155 


9B 


1011 






Y(odd) 






156 


9C 


1100 






9 (even) 


upper case 


upper case 


157 


9D 


1101 






9 (odd) 






158 


9E 


1110 






y (odd) 






159 


9F 


1111 






y (even) 


C (EOT) 


C (EOT) 


160 


A0 


1010 0000 






WRU (even) 


* 


T 


161 


Al 


0001 


~ 




WRU (odd) 






162 


A2 


0010 


s 




E (odd) 






163 


A3 


0011 


t 




E (even) 


7 


X 


164 


A4 


0100 


u 




% (odd) 






165 


A5 


0101 


V 




% (even) 


S 


N 
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Eigh t-bit 




2741 












data interchange 


2741 


PTTC/ 










ASCII 


EBASC* 


PTTC/EBCD 


Corresponden ce 


Decimal 


Hex 


Binary 


EBCDIC 


(see Note 1) 


(see Note 2) 


EBCD 


2741 


166 


A6 


1010 0110 


w 




e (even) 


T 


U 


167 


A7 


0111 


X 




e (odd) 






168 


A8 


1000 


y 




NAK (odd) 






169 


A9 


1001 


z 




NAK (even) 


U 


E 


170 


AA 


1010 






U (even) 


V 


D 


171 


AB 


1011 






U (odd) 






172 


AC 


1100 






5 (even) 


w 


K 


173 


AD 


1101 






5 (odd) 






174 


AE 


1110 






u (odd) 






175 


AF 


1111 






u (even) 


X 


C 


176 


BO 


1011 0000 






return (odd) 






177 


Bl 


0001 






return (even) 


Y 


L 


178 


B2 


0010 






M (even) 


z 


H 


179 


B3 


0011 






M (odd) 






180 


B4 


0100 






- (even) 






181 


B5 


0101 






- (odd) 






182 


B6 


0110 






m (odd) 






183 


B7 


0111 






m (even) 


(D (SOA),| 


B 


184 


B8 


1000 






GS (even) 






185 


B9 


1001 






GS (odd) 






186 


BA 


1010 






] (odd) 






187 


BB 


1011 






] (even) 


index 


index 


188 


BC 


1100 






= (odd) 






189 


BD 


1101 






= (even) 


(D (EOB),ETB 




190 


BE 


1110 






} (even) 






191 


BF 


1111 






\ (odd) 






192 


CO 


1100 0000 


\ 




EOM (even) 


® (NAK),- 




193 


CI 


0001 


A 




EOM (odd) 






194 


C2 


0010 


B 




C (odd) 






195 


C3 


0011 


c 




C (even) 


J 


M 


196 


C4 


0100 


D 




# (odd) 






197 


C5 


0101 


E 




# (even) 


K 




198 


C6 


0110 


F 




c (even) 


L 


V 


199 


C7 


0111 


G 




c (odd) 






200 


C8 


1000 


H 




X-OFF (odd) 






201 


C9 


1001 


I 




X-OFF (even) 


M 


" 


202 


CA 


1010 






S (even) 


N 


R 


203 


CB 


1011 






S (odd) 






204 


CC 


1100 


J 1 




3 (even) 


O 


I 


205 


CD 


1101 






3 (odd) 






206 


CE 


1110 


V 




s (odd) 






207 


CF 


1111 






s (even) 


P 


A 


208 


DO 


1101 0000 


\ 




vertical tab (odd) 






209 


Dl 


0001 


J 




vertical tab (even) 


Q 


O 


210 


D2 


0010 


K 




K (even) 


R 


s 


211 


D3 


0011 


L 




K (odd) 






212 


D4 


0100 


M 




+ (even) 






213 


D5 


0101 


N 




+ (odd) 






214 


D6 


0110 







k (odd) 






215 


D7 


0111 


P 




k (even) 


j 


w 


216 


D8 


1000 


Q 




ESC (even) 






217 


D9 


1001 


R 




ESC (odd) 






218 


DA 


1010 






[ (odd) 






219 


DB 


1011 






[ (even) 


CRLF 


CRLF 


220 


DC 


1100 






; (odd) 






221 


DD 


1101 






; (even) 


backspace 


backspace 


222 


DE 


1110 






{ (even) 


idle 


idle 



_• 
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Eight-bit 




2741 












data interchange 


2741 


PTTCl 










ASCII 


EBASC* 


PTTC/EBCD 


Correspondence 


Decimal 


Hex 


Binary 


EBCDIC 


(see Note 1) 


(see Note 2) 


EBCD 


CRSP 


223 


DF 


1101 1111 






\ (odd) 






224 


EO 


1110 0000 


\ 




bell (odd) 






225 


El 


0001 






bell (even) 


+ 


J 


226 


E2 


0010 


s 




G (even) 


A 


G 


227 


E3 


0011 


T 




G (odd) 






228 


E4 


0100 


u 




' (even) 


B 


+ 


229 


E5 


0101 


V 




' (odd) 






230 


E6 


0110 


w 




g (odd) 






231 


E7 


0111 


X 




g (even) 


C 


F 


232 


E8 


1000 


Y 




ETB (even) 


D 


P 


233 


E9 


1001 


z 




ETB (odd) 






234 


EA 


1010 






W (odd) 






235 


EB 


1011 






W (even) 


E 




236 


EC 


1100 


H 




7 (odd) 






237 


ED 


1101 






7 (even) 


F 


Q 


238 


EE 


1110 






w (even) 


G 


comma 


239 


EF 


1111 






w (odd) 






240 


F0 


mi oooo 







shift in (even) 


H 


? 


241 


Fl 


0001 


1 




shift in (odd) 






242 


F2 


0010 


2 




O (odd) 






243 


F3 


0011 


3 




O (even) 


I 


Y 


244 


F4 


0100 


4 




/ (odd) 






245 


F5 


0101 


5 




/ (even) 






246 


F6 


0110 


6 




o (even) 


® (YAK), —i 




247 


F7 


0111 


7 




o (odd) 






248 


F8 


1000 


8 




US (odd) 






249 


F9 


1001 


9 




US (even) 






250 


FA 


1010 


LVM 




<= (even) 


horiz tab 


tab 


251 


FB 


1011 






*= (odd) 






252 


FC 


1100 






? (even) 


lower case 


lower case 


253 


FD 


1101 






? (odd) 






254 


FE 


1110 






rub out (odd) 






255 


FF 


mi 






rub out (even) 


delete 





Notes. 

1. ASCII terminals attached via #7850 or #2095 with #2096. 

2. ASCII terminals attached via #1610 or #2091 with #2092. 
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BIBLIOGRAPHY 



EVENT DRIVEN EXECUTIVE LIBRARY SUMMARY 



The library summary is a guide to the Event Driven Executive 
library. By briefly listing the content of each book and 
providing a suggested reading sequence for the library* it 
should assist you in using the library as a whole as well as 
direct you to the individual books you require. 



Event Driven Executive Library 



The IBM Series/1 Event Driven Executive library materials 
consist of five full-sized books, a quick reference pocket 
book, and a set of tabs! 



IBM Series/1 Event Driven Executive Svstem Guide 


(or 


System Guide), SC34-0312 




IBM Series/1 Event Driven Executive Utilities, Opera 


itor 


Commands, Program Preparation, Messaqes and Codes 


(or 


Utilities), SC34-0313 




IBM Series/1 Event Driven Executive Lanquaqe Reference 


(or 


Language Reference), SC34-0314 




IBM Series/1 Event Driven Executive Communications 


and 



Terminal Application Guide (or Communications Guide ), 
SC34-0316 

IBM Series/1 Event Driven Executive Internal Design (or 
Internal Pes i gn ) , LY34-0168 

IBM Series/1 Event Driven Executive Multiple Terminal Man- 
ager Internal Desig n (or Multiple Terminal Manager 
Interna 1 Pes i gn ) , LY34-0190 

IBM Series/1 Event Driven Executive Indexed Access Method 
Internal Design ( o r Indexed Access Method Internal 
Design ) , LY34-0189 

IBM Series/1 Event Driven Executive Reference Summary (or 
Reference Summary ), SX34-0101 

IBM Series/1 Event Driven Executive Tabs (or Tabs ) , 
SX34-0030 
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Summary of Library 



System Guide 



The System Guide introduces the concepts and capabilities o.f 
the Event Driven Executive system. It discusses mul t i -task i ng , 
program and task structure* program overlays, storage manage- 
ment, and data management. 

Planning aids include hardware and software requirements, 
along with guidelines for storage estimating. 

The System Guide also presents step-by-step procedures for 
generating a supervisor tailored to your Series/1 hardware 
configuration and software needs. 

The description of the Indexed Access Method contains the 
information on how to write applications that use indexed data 
sets . 

The description of the session manager includes a procedure for 
modifying the session manager to include application programs 
in the primary option menu so that you can execute them under 
the session manager. You can also add a procedure to compile, 
link, and update programs. 

Information is also provided concerning partitioned data sets, 
tape data organization, diagnostic aids, inter-program commu- 
nication, logical screens, and dynamic data set allocation. 



V._..y / 



Uti lities 



Utilities describes: 

• Event Driven Executive utility programs 

• Operator commands 

• Procedures to prepare and execute system and application 
programs 

• The session manager -- a menu-driven interface program 
that will invoke the programs required for program devel- 
opment 

• Messages and codes issued by the Event Driven Executive 
system 
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The operator commands* program preparation facilities* and 
session manager are grouped by function and discussions 
include detailed syntax and explanations. The utilities are 
presented in alphabetical order. 



Language Reference 

The Language Reference familiarizes you with the Event Driven 
Language by first grouping the instructions into functional 
categories. Then the instructions are listed alphabetically* 
with complete syntax and an explanation of each operand. 

The final section of the Language Reference contains examples 
of using the Event Driven language for applications such as: 

Program load i ng 

User exit routine 

Gr aph i cs 

I/O level control program 

Indexing and hardware register usage 



Communications Guide 



The Communications Guide introduces the Event Driven Executive 
communications support -- binary synchronous communications* 
asynchronous communications* and the Host Communications 
Facility. 

The Communications Guide contains coding details for all util- 
ities and Event Driven language instructions needed for commu- 
nications support and advanced terminal applications. 



Interna 1 Pes i gn 

Interna 1 Pes i gn describes the internal logic flow and specifi- 
cations of the Event Driven Executive system so that you can 
understand how the system interfaces with application pro- 
grams. It familiarizes you with the design and implementation 
by describing the purpose* function, and operation of the vari- 
ous Event Driven Executive system programs. 



Bibliography 
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Multiple Terminal Manager Internal Design and Indexed Access 
Method Internal Design describe the internal logic flow and 
specifications of these programs. 

Unlike the other manuals in the library, the Interna 1 Pes i gn 
books contain material that is the licensed property of IBM and 
they are available only to licensed users of the Event Driven 
Executive system. 



Reference Summary 



The Reference Summary is a pocket-sized booklet to be used for 
quick reference. It lists the Event Driven language 
instructions with their syntax* the utility and program prepa- 
ration commands* and the completion codes. 



Tabs 



The tabs package must be ordered separately. The package con- 
tains 33 index tabs by subject, with additional blank tabs. 
These extended tabular pages can be inserted at the front of 
various sections of the library. The tabs are color coded 
according to the major library topics. 



V 



Reading Sequence 



All readers of the Event Driven Executive library should begin 
with the first three chapters of the System Guide 
("Introduction," "The Supervisor and Emulator," and "Data Man- 
agement") for an overview of the Event Driven Executive con- 
cepts and facilities. 

Readers responsible for installing and preparing the system 
should then continue in the System Gu i de with "System Config- 
uration" and "System Generation." 

All readers should review the U t i 1 i t i e s "Introduction" to 
become familiar with the utility functions available for the 
Event Driven Executive system. Then you can read more specific 
sections for particular utilities, operator commands, and pro- 
gram preparation facilities. 

After you have a basic understanding of the Event Driven Execu- 
tive system and how you can best use the system for your appli- 
cations, you should read the Language Reference 

"Introduction." This will familiarize you with the potential 
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of the Event Driven Language and prepare you to start coding 
application programs. 

If you have communications support for your Event Driven Execu- 
tive system, you should read the Communications Guide > which is 
an extension of the System Gu i de » Utilities , and the Language 
Reference . 

After you know the functions of the various Event Driven 
Language instructions, utilities, and program preparation 
facilities, you may wish to refer only to the Reference Summary 
for correct syntax while coding your applications. 

Only readers responsible for the support or modification of the 
Event Driven Executive system need to read Internal Design . 



OTHER EVENT DRIVEN EXECUTIVE PROGRAMMING PUBLICATIONS 



IBM Series/1 Event Driven Executive FORTRAN IV User's 
Guide , SC34-0315. 

IBM Series/1 Event Driven Executive PL/I Language 
Reference , GC34-0147. 

IBM Series/1 Event Driven Executive PL/I User's Guide , 
GC34-0148. 

IBM Series/1 Event Driven Executive COBOL Programmer's 
Guide , SL23-0014. 

IBM Series/1 Event Driven Executive Sort/Merge Program- 
mer 's Gui de , SL23-0016 

IBM Series/1 Event Driven Executive Macro Assembler 
Reference , GC34-0317. 

IBM Series/1 Event Driven Executive Study Guide , 
SR30-0436. 



OTHER SERIES/1 PROGRAMMING PUBLICATIONS 

• IBM Series/1 Programming System Summary , GC34-0285. 

• IBM Series/1 COBOL Language Reference , GC34-0234. 

• IBM Series/1 FORTRAN IV Language Reference , GC34-0133 
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P82600 User's Guide, SC34-1654. 
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• IBM Data Processing Glossary , GC20-1699. 

• IBM Series/1 Graphic Bibliography * GA34-0055. 
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Processor 
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Description, GA34-0022. 
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Descr i ption , GA34-0021. 

IBM Series/1 Communications Features Description , GA34 
-0028. 

IBM Series/1 3101 Display Terminal Description , GA34-2034. 

IBM Series/1 4962 Disk Storage Unit and 4964 Diskette Unit 

Description , GA34-0024. 

IBM Series/1 4963 Disk Subsystem Description , GA34-0051. 

IBM Series/1 4966 Diskette Magazine Unit Description , 
GA34-0052. 
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IBM Series/1 4969 Magnetic Tape Subsystem Description * 
GA34-0087. 

IBM Series/1 4973 Line Printer Description * GA34-0044. 

IBM Series/1 4974 Printer Description * GA34-0025. 

IBM Series/1 4978-1 Display Station (RPQ D02055) and 
Attachment (RPQ D02038) General Information * GA34-1550 

IBM Series/1 4978-1 Display Station, Keyboard (RPQ D02056) 
General Information , GA34-1551 

IBM Series/1 4978-1 Display Station, Keyboard (RPQ DQ2057) 
General Information , GA34-1552 

IBM Series/1 4978-1 Display Station Keyboards (RPQ D02064 
and D02065) General Information * GA34-1553 

IBM Series/1 4979 Display Station Description * GA34-0026 

IBM Series/1 4982 Sensor Input/Output Unit Description * 
GA34-0027 

IBM Series/1 Data Collection Interactive RPQs D02312* 
D02313, and D02314 Custom Feature , GA34-1567 
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GLOSSARY 



This glossary contains terms that are used in the Series/1 Event Driven 
Executive software publications. All software and hardware terms sre 
Series/1 oriented. This glossary defines terms used in this library and 
serves as a supplement to the IBM Data Processing Glossary (GC20-1699). 



^ 



$SYSLOGA. The name of the 
alternate system logging device. 
This device is optional but* if 
defined* should be a terminal with 
keyboard capability* not just a 
pri nter . 

$SYSLOG. The name of the system 
logging device or operator 
station; must be defined for every 
system. It should be a terminal 
with keyboard capability, not just 
a printer. 



$SYSPRTR. 
pri nter. 



The name of the system 



ACCA. See asynchronous 
communications control adapter. 

address key. Identifies a set of 
Series/1 segmentation registers 
and represents an address space. 
It is one less than the partition 
number. 



the Multiple Terminal Manager 
faci 1 i ti es. 

asynchronous communications con- 
trol adapter. An ASCII terminal 
attached via #1610* #2091 with 
#2092, or #2095 with #2096 adapt- 
ers. 

attention list. A series of pairs 
of 1 to 8 byte EBCDIC strings and 
addresses pointing to EDL 
instructions. When the attention 
key is pressed on the terminal* 
the operator can enter one of the 
strings to cause the associated 
EDL instructions to be executed. 

backup. A copy of data to be used 
in the event the original data is 
lost or damaged. 

base records. Records that have 
been placed into an indexed data 
set while in load mode. 



address space. The logical 
storage identified by an address 
key. An address space is the 
storage for a partition. 

application program manager. The 
component of the Multiple Terminal 
Manager that provides the program 
management facilities required to 
process user requests. It con- 
trols the contents of a program 
area and the execution of programs 
within the area. 



basic exchange format. A standard 

format for exchanging data on 
di skettes between systems or 
devices. 

binary synchronous device data 
block (BSCDDB). A control block 
that provides the information to 
control one Series/1 Binary Syn- 
chronous Adapter. It determines 
the line characteristics and pro- 
vides dedicated storage for that 
li ne. 



application program stub. A 
collection of subroutines that are 
appended to a program by the link- 
age editor to provide the link 
from the application program to 



block. (1) See data block or 
index block. (2) In the Indexed 
Method* the unit of space used by 
the access method to contain 
indexes and data. 
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BSCDDB. See binary synchronous 
device data block. 

buffer. An area of storage that 
is temporarily reserved for use in 
performing an input/output oper- 
ation, into which data is read or 
from which data is written. See 
input buffer and output buffer. 

bypass label processing. Access 
of a tape without any label proc- 
essing support. 

CCB. See terminal control block. 

character image. An alphabetic, 
numeric, or special character 
defined for an IBM 4978 Display 
Station. Each character image is 
defined by a dot matrix that is 
coded into eight bytes. 

character image table. An area 
containing the 256 character 
images that can be defined for an 
IBM 4978 Display Station. Each 
character image is coded into 
eight bytes, the entire table of 
codes requiring 2048 bytes of 
storage. 

Cluster. In an indexed file, a 
group of data blocks that is 
pointed to from the same 
primary-level index block, and 
includes the primary-level index 
block. The data records and 
blocks contained in a cluster are 
logically contiguous, but are not 
necessarily physically contiguous. 

COD (change of direction). A 
character used with ACCA terminal 
to indicate a reverse in the 
direction of data movement. 

command. A character string from 
a source external to the system 
that represents a request for 
action by the system. 

common area. A usei — defined data 
area that is mapped into every 
partition at the same address. It 



can be used to contain control 
blocks or data that will be 
accessed by more than one program. 

completion code. An indicator 
that reflects the status of the 
execution of a program. The com- 
pletion code is displayed or 
printed on the program's output 
devi ce. 

conversion. See update. 

cross partition service. A 

function that accesses data in two 
parti ti ons. 

data block. In an indexed file, 
an area that contains control 
information and data records. 
These blocks are a multiple of 256 
bytes. 

data set. A group of contiguous 
records within a volume pointed to 
by a directory member entry in the 
directory for the volume. 

data set control block (DSCB). A 

control block that provides the 
information required to access a 
data set, volume or directory 
using READ and WRITE. 

data set Shut down. An indexed 
data set that has been marked (in 
main storage only) as unusable due 
to an error. 

DCE. See directory control entry. 

DDB. See disk data block. 

direct access. (1) The access 
method used to READ or WRITE 
records on a di sk or di skette 
device by specifying their 
location relative the beginning of 
the data set or volume. (2) In 
the Indexed Access Method, locat- 
ing any record via its key without 
respect to the previous operation. 
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directory. A series of contiguous 
records in a volume that describe 
the contents in terms of allocated 
data sets and free spaces. 

directory control entry 
(DCE). The first 32 bytes of the 
first record of a directory in 
which a description of the direc- 
tory is stored. 

directory member entry (DUE). A 
32-byte directory entry describing 
an allocated data set. 

disk data block (DDB). A control 
block that describes a direct 
access volume. 

display Station. An IBM 4978 or 
4979 display terminal or similar 
terminal with a keyboard and a 
video display. 

DME. See directory member entry. 

DSCB. See data set control block. 

dynamic Storage. An increment of 
storage that is appended to a pro- 
gram when it is loaded. 

end-of-data indicator. A code 
that signals that the last record 
of a data set has been read or 
written. End-of-data is deter- 
mined by an end-of-data pointer in 
the DME or by the physical end of 
the data set. 



event control block (ECB). A 

control block used to record the 
status (occurred or not occurred) 
of an event; often used to syn- 
chronize the execution of tasks. 
ECBs are used in conjunction with 
the WAIT and POST instructions. 

event driven language (EDL). The 
language for input to the Event 
Driven Executive compiler 
(SEDXASM), or the Macro and Host 
assemblers in conjunction with the 
Event Driven Executive macro 
libraries. The output is intei — 
preted by the Event Driven Execu- 
tive emulator. 

EXIO [execute input or 
output). An EDL facility that 
provides user controlled access to 
Series/1 input/output devices. 

external label. A label attached 
to the outside of a tape that 
identifies the tape visually. It 
usually contains items of iden- 
tification such as file name and 
number , creation data, number of 
volumes, department number, and so 
on. 

external name (EXTRN). The l- to 
8-character symbolic EBCDIC name 
for an entry point or data field 
that is not defined within the 
module that references the name. 

FCA. See file control area. 



ECB. See event control block. 



FCB. See file control block. 



EDL. See Event Driven Language. 

emulator. The portion of the 
Event Driven Executive supervisor 
that interprets EDL instructions 
and performs the function speci- 
fied by each EDL statement. 

end-of-tape (EOT). A reflective 
marker placed near the end of a 
tape and sensed during output. 
The marker signals that the tape 
is nearly full. 



file control area (FCA). A 

Multiple Terminal Manager data 
area that describes a file access 
request. 

file control block (FCB). In an 
indexed data set, the first block 
of the data set. It contains 
descriptive information about the 
data contained in the data set. 
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file manager. A collection of 
subroutines contained within the 
program manager of the Multiple 
Terminal Manager that provides 
common support for all disk data 
transfer operations as needed for 
transact i on-ori en ted appli cati on 
programs. It supports indexed and 
direct files under the control of 
a single callable function. 

formatted screen image. A 
collection of display elements or 
display groups (such as operator 
prompts and field input names and 
areas) that are presented together 
at one time on a display device. 

free pool. In an indexed data 
set* a group of blocks that can be 
used as either a data block or an 
index block. These differ from 
other free blocks in that these 
are not initially assigned to spe- 
cific logical positions in the 
data set. 

free space. In the Indexed Access 
Method, record spaces or blocks 
that do not currently contain 
data, and are available for use. 

free space entry (FSE). A 4-byte 
directory entry defining an area 
of free space within a volume. 

FSE. See free space entry. 

hardware timer. The timer 
features available with the 
Series/1 processors. Specif- 
ically, the 7840 Timer Feature 
card or the native timer (4952 
only). Only one or the other is 
supported by the Event Driven 
Executi ve. 

host assembler. The assembler 
licensed program that executes in 
a 370 (host) system and produces 
object output for the Series/1. 
The source input to the host 
assembler is coded in Event Driven 
Language or Series/1 assembler 
language. The host assembler 



refers to the System/370 Program 
Preparation Facility (5798-NNQ). 

host system. Any system whose 
resources are used to perform 
services such as program prepara- 
tion for a Series/1. It can be 
connected to a Series/1 by a com- 
munications link. 

IACB. See indexed access control 
block. 

IAR. See instruction address 
regi ster . 

ICB. See indexed access control 
block. 

IIB. See interrupt information 
byte. 

image Store. The area in a 4978 
that contains the character image 
table. 

index. In the Indexed Access 
Method, an ordered collection of 
pairs, each consisting of a key 
and a pointer, used to sequence 
and locate the records in an 
Indexed Access Method data set. 

index block. In an indexed file, 
an area that contains control 
information and index entries. 
These blocks are a multiple of 256 
bytes. 

indexed access control block 
CIACB/ICB). The control block 
that relates an application pro- 
gram to an indexed data set. 

indexed access method. An access 
method for direct or sequential 
processing of fixed-length records 
by use of a record's key. 

indexed data set. A data set 
specifically created, formatted 
and used by the Indexed Access 
Method. An indexed data set may 
also be called an indexed file. 
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indexed file. Synonym for indexed 
data set. 

index entry. In an indexed file, 
a key-pointer pair, where the 
pointer is be used to locate a 
lowei — level index block or a data 
block. 



request to or from a terminal. 

job. A collection of related 
program execution requests pre- 
sented in the form of job control 
statements, identified to the 
jobstream processor by a JOB 
statement. 
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index register (#1, #2). Two 

words defined in EDL and contained 
in the task control block for each 
task. They are used to contain 
data or for address computation. 

input buffer. (1) See buffer. 
(2) In the Multiple Terminal Man- 
ager, an &rea for terminal input 
and output. 

input output control block 
(IOCB). A control block contain- 
ing information about a terminal 
such as the symbolic name, size 
and shape of screen, the size of 
the forms in a printer. 

instruction address register 
(IAR). The pointer that identi- 
fies the instruction currently 
being executed. The Series/1 
maintains a hardware IAR to detei — 
mine the Series/1 assembler 
instruction being executed. It is 
located in the level status block 
(LSB). 

interactive. The mode in which a 
program conducts a continuous 
dialogue between the user and the 
system. 

internal label. An area on tape 
used to record identifying infoi — 
mation (similar to the identifying 
information placed on an external 
label). Internal labels are 
checked by the system to ensure 
that the correct volume is 
mounted. 

interrupt information byte 
(IIB). In the Multiple Terminal 
Manager, a word containing the 
status of a previous input/output 



job control statement. A 
statement in a job that specifies 
requests for program execution, 
program parameters, data set defi- 
nitions, sequence of execution, 
and, in general, describes the 
environment required to execute 
the program. 

job stream processor. The job 
processing facility that reads job 
control statements and processes 
the requests made by these state- 
ments. The Event Driven Executive 
job stream processor is $J0BUTIL. 

key. In the Indexed Access 
Method, one or more consecutive 
characters in a data record, used 
to identify the record and estab- 
lish its order with respect to 
other records. See also key 
field. 

key field. A field, located in 
the same position in each record 
of sn Indexed Access Method data 
set, whose content is used for the 
key of a record. 

level status block (LSB). A 

Series/1 hardware data area that 
contains processor status. 

library. A set of contiguous 
records within a volume. It con- 
tains a directory, data sets 
and/or available space. 

line. A string of characters 
accepted by the system as a single 
input from a terminal; for exam- 
ple, all characters entered before 
the carriage return on the tele- 
typewriter or the ENTER key on the 
display station is pressed. 



Glossary 321 



link edit. The process of 
resolving symbols in one or more 
object modules to produce another 
single module that is the input to 
the update process. 

load mode. In the Indexed Access 
Method, the mode in which records 
are initially placed in an indexed 
file. 

load module. A single module 
having cross references resolved 
and prepared for loading into 
storage for execution. The module 
is the output of the SUPDATE or 
$UPDATEH utility. 

load point. A reflective marker 
placed near the beginning of a 
tape to indicate where the first 
record is written. 

lock. In the Indexed Access 
Method, a method of indicating 
that a record or block is in use 
and is not available for another 
request. 

LSB. See level status block. 

msmber. A term used to identify a 
named portion of a partitioned 
data set (PD5). Sometimes member 
is also used as a synonym for a 
data set. See data set. 

menu. A formatted screen image 
containing a list of options. The 
user selects an option to invoke a 
program. 

menu-driven. The mode of 
processing in which input consists 
of the responses to prompting from 
an option menu. 

multifile volume. A unit of 
recording media, such as tape reel 
or disk pack, that contains more 
than one data file. 

multiple terminal manager. An 
Event Driven Executive licensed 
program that provides support for 



transaction-oriented applications 
on a Series/1. It provides the 
capability to define transactions 
and manage the programs that sup- 
port those transactions. It also 
manages multiple terminals as 
needed to support these trans- 
acti ons. 

multi volume file. A data file 
that, due to its size, requires 
more than one unit of recording 
media (such as tape reel or disk 
pack) to contain the entire file. 

non-labeled tapes. Tapes that do 
not contain identifying labels (as 
in standard labeled tapes) and 
contain only files separated by 
tapemarks. 

null Character. A user-defined 
character used to define the 
unprotected fields of a formatted 
screen. 

option selection menu. A full 
screen display used by the Session 
Manager to point to other menus or 
system functions, one of which is 
to be selected by the operator. 
(See primary option menu and sec- 
ondary option menu.) 

output buffer. (1) See buffer. 
(2) In the Multiple Terminal Man- 
ager, an area used for screen 
output and to pass data to subse- 
quent transaction programs. 

overlay. The technique of reusing 
a single storage area allocated to 
a program during execution. The 
storage area can be reused by 
loading it with overlay programs 
that have been specified in the 
PROGRAM statement of the program. 

overlay area. A storage area 
within a program reserved for 
overlay programs specified in the 
PROGRAM statement. 
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parameter selection menu. A full 
screen display used by the Session 
Manager to indicate the parameters 
to be passed to a program. 

partition. A contiguous 
fixed-sized area of storage. Each 
partition is a separate address 
space. 

physical timer. Synonym for 
hardware timer. 

prefind. To locate the data sets 
or overlay programs to be used by 
a program and to store the neces- 
sary information so that the time 
required to load the prefound 
items is reduced. 

primary-level index block. In an 
indexed data set, the lowest level 
index block. It contains the rel- 
ative block numbers (RBNs) and 
high keys of several data blocks. 
See cluster. 

primary menu. The program 
selection screen displayed by the 
Multiple Terminal Manager. 

primary option menu. The first 
full screen display provided by 
the Session Manager. 

primary task. The first task 
executed by the supervisor when a 
program is loaded into storage. 
It is identified by the PROGRAM 
statement. 

priority. A combination of 
hardware interrupt level priority 
and a software ranking within a 
level. Both primary and secondary 
'tasks will execute asynchronously 
within the system according to the 
priority assigned to them. 

process mode. In the Indexed 
Access Method, the mode in which 
records may be retrieved, updated, 
inserted or deleted. 



processor status word (PSW). A 

16-bit register used to (1) record 
error or exception conditions that 
may prevent further processing and 
(2) hold certain flags that aid in 
error recovery. 

program. A disk- or 
diskette-resident collection of 
one or more tasks defined by a 
PROGRAM statement; the unit that 
is loaded into storage. (See pri- 
mary task and secondary task.) 

program header. The control block 
found at the beginning of a 
program that identifies the prima- 
ry task, data sets, storage 
requirements and other resources 
required by a program. 

program/storage manager. A 
component of the Multiple Terminal 
Manager that controls the 
execution and flow of application 
programs within a single program 
area and contains the support 
needed to allow multiple opei — 
ations and sharing of the program 
area. 

protected field. On a display 
device, a field in which the opei — 
ator cannot enter, modify, or 
erase data from the keyboard. It 
can contain text that the user can 
read. 

PSW. See processor status word. 

QCB . See queue control block. 

QD. See queue descriptor. 

QE. See queue element. 

queue control block (QCB). A data 
area used to serialize access to 
resources that cannot be shared. 
See serially reusable resource. 

queue descriptor (QD). A control 
block describing a queue built by 
the DEFINEQ instruction. 
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queue element (QE). An entry in 
the queue defined by the queue 
descriptor. 

record. (1) The smallest unit of 
direct access storage that can be 
accessed by an application program 
on a disk or diskette using READ 
and WRITE. Records are 256 bytes 
in length. (2) In the Indexed 
Access Method, the logical unit 
that is transferred between $IAM 
and the user's buffer. The length 
of the buffer is defined by the 
user. 

recovery. The use of backup data 
to recreate data that has been 
lost or damaged. 

reflective marker. A small 
adhesive marker attached to the 
reverse (nonrecordi ng) surface of 
a reel of magnetic tape. 
Normally, two reflective markers 
are used on each reel of tape. 
One indicates the beginning of the 
recording area on the tape (load 
point), and the other indicates 
the proximity to the end of the 
recording area (EOT) on the reel. 

relative record number. An 
integer value identifying the 
position of a record in a data set 
relative to the beginning of the 
data set. The first record of a 
data set is record one, the second 
is record two, the third is record 
three. 



roll screen. A display screen on 
which data is displayed 24 lines 
at a time or data is entered line 
by line, beginning with line at 
the top of the screen and continu- 
ing through line 23 at the bottom 
of the screen. When a roll screen 
device's screen is full (all 24 
lines used)* an attempt to display 
the next line results in removal 
of the old screen (screen is 
erased) and the new line on line 
is displayed at the top of the 
screen. 

SBIOCB. See sensor based I/O 
control block. 

second-level index block. In an 
indexed data set, the 
second-lowest level index block. 
It contains the addresses and high 
keys of several primary-level 
index blocks. 

secondary option menu. In the 
Session Manager, the second in a 
series of predefined procedures 
grouped together in a hierarchical 
structure of menus. Secondary 
option menus provide a breakdown 
of the functions available under 
the session manager as specified 
on the primary option menu. 

secondary task. Any task other 
than the primary task. A second- 
ary task must be attached by a 
primary task or another secondary 
task. 
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reorganize. For an indexed data 
set, the copying of the data to a 
new indexed data set in a manner 
that rearranges the data for more 
optimum processing and free space 
di stribution. 

return code. An indicator that 
reflects the results of the exe- 
cution of an instruction or sub- 
routine. The return code is 
placed in the task code word (at 
the beginning of the task control 
block). 



sector. The smallest addressable 
unit of storage on a disk or 
diskette. A sector on a 4962 or 
4963 disk is equivalent to an 
Event Driven Executive record. On 
a 4964 or 4966 diskette, two sec- 
tors are equivalent to an Event 
Driven Executive record. 

sensor based I/O control block 
(SBIOCB). A control block con- 
taining information related to 
sensor I/O operations. 
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sequential access. The processing 
of a data set in order of occur- 
rence of the records in the data 
set. (1) In the Indexed Access 
Method, the processing of records 
in ascending collating sequence 
order of the keys. (2) When using 
READ/WRITE, the processing of 
records in ascending relative 
record number sequence. 

serially reusable resource 
(SRR). A resource that can only 
be accessed by one task at a time. 
Serially reusable resources are 
usually managed via (1) a QCB and 
ENQ/DEQ statements or (2) an ECB 
and WAIT/POST statements. 

session manager. A series of 
predefined procedures grouped 
together as a hierarchical struc- 
ture of menus from which you 
select the utility functions, pro- 
gram preparation facilities, and 
language processors needed to pre- 
pare and execute application pro- 
grams. The menus consist of a 
primary option menu that displays 
functional groupings and secondary 
option menus that display a break- 
down of these functional 
groupi ngs. 

shared resource. A resource that 
can be used by more than one task 
at the same time. 



shut down, 
down . 



See data set shut 



trailer label following the data 
records) . 

Static screen. A display screen 
formatted with predetermined 
protected and unprotected areas. 
Areas defined as operator prompts 
or input field names are protected 
to prevent accidental overlay by 
input data. Areas defined as 
input areas are not protected and 
are usually filled in by an opera- 
tor. The entire screen is treated 
as a page of information. 

subroutine. A sequence of 
instructions that may be accessed 
from one or more points in a pro- 
gram. 

supervisor. The component of the 
Event Driven Executive capable of 
controlling execution of both sys- 
tem and application programs. 

system configuration. The process 
of defining devices and features 
attached to the Series/1. 

SYSGEN. See system generation. 

system generation. The processing 
of user selected options to create 
a supervisor tailored to the needs 
of a specific Series/1 configura- 
ti on. 

system partition. The partition 
that contains the supervisor (pai — 
tition number 1, address space 0). 



source module/program. A 
collection of instructions and 
statements that constitute the 
input to a compiler or assembler. 
Statements may be created or modi- 
fied using one of the text editing 
faci li ti es. 

standard labels. Fixed length 
80-character records on tape con- 
taining specific fields of infoi — 
mation (a volume label identifying 
the tape volume, a header label 
preceding the data records, and a 



tapemark. A control character 
recorded on tape used to separate 
files. 

task. The basic executable unit 
of work for the supervisor. Each 
task is assigned its own priority 
and processor time is allocated 
according to this priority. Tasks 
run independently of each other 
and compete for the system 
resources. The first task of a 
program is the primary task. All 
tasks attached by the primary task 
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are secondary tasks. 

task code word. The first two 
words (32 bits) of a task's TCB; 
used by the emulator to pass 
information from system to task 
regarding the outcome of various 
operations* such as event com- 
pletion or arithmetic operations. 

task control block (TCB). A 

control block that contains infoi — 
mation for a task. The informa- 
tion consists of pointers, save 
areas, work areas, and indicators 
required by the supervisor for 
controlling execution of a task. 

task supervisor. The portion of 
the Event Driven Executive that 
manages the dispatching and 
switching of tasks. 

TCB. See task control block. 

terminal. A display station, 
teletypewriter or printer. 

terminal control block (CCB). A 
control block that defines the 
device characteristics, provides 
temporary storage, and contains 
links to other system control 
blocks for a particular terminal. 

terminal environment block 
(TEB). A control block that con- 
tains information on a terminals 
attributes and the program manager 
operating under the Multiple Ter- 
minal Manager. It is used for 
processing requests between the 
terminal servers and the program 
manager. 

terminal screen manager. The 
component of the Multiple Terminal 
Manager that controls the presen- 
tation of screens and communi- 
cations between terminals and 
transaction programs. 

terminal server. A group of 
programs that perform all the 
input/output and interrupt handl- 



ing functions for terminal devices 
under control of the Multiple Tei — 
minal Manager. 

trace range. A specified number 
of instruction addresses within 
which the flow of execution can be 
traced. 

transaction oriented 
applications. Program execution 
driven by operator actions, such 
as responses to prompts from the 
system. Specifically, applica- 
tions executed under control of 
the Multiple Terminal Manager. 

transaction program. See 
transaction-oriented applications. 

transaction selection menu. A 
Multiple Terminal Manager display 
screen (menu) offering the user a 
choice of functions, such as read- 
ing from a data file, displaying 
data on a terminal, or waiting for 
a response. Based upon the choice 
of option, the application program 
performs the requested processing 
operati on. 

unprotected field. On a display 
device, a field in which the user 
can enter, modify, or erase data 
using the keyboard. Unprotected 
fields on a static screen are 
defined by the null character. 

update. (1) To alter the contents 
of storage or a data set. (2) To 
convert object modules, produced 
as the output of an assembly or 
compilation, or the output of the 
linkage editor, into a form that 
can be loaded into storage for 
program execution and to update 
the directory of the volume on 
which the loadable program is 
stored. 

user exit. (1) Assembly language 
instructions included as part of 
an EDL program and invoked via the 
USER instruction. (2) A point in 
an IBM-supplied program where a 
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user written routine can be given 
control . 

vary Offline. (1) To change the 
status of a device from online to 
offline. When a device is off- 
line, no data set can be accessed 
on that device. (2) To place a 
disk or diskette in a state where 
it is not available for use by the 
system; however, it will still be 
available for executing I/O at the 
basic access level (EXIO). 



volume. A disk or diskette 
subdivision defined during system 
configuration. A volume may con- 
tain up to 32,767 records. As 
many volumes may be defined for a 
disk as will physically fit. A 
diskette is limited to one volume. 

volume label. A label that 
uniquely identifies a single unit 
of storage media. 
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vary online. To restore a device 
to a state where it is available 
for use by the system. 
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COMMON INDEX 



This index is common to the Event Driven Executive library. The index 
includes entries from the seven publications listed below. (The Glossary 
is not indexed.) Each publication has a copy of the index, which provides 
a cross-reference between the publications. 

Each page number entry contains a single letter prefix which identifies 
the publication where the listed subject can be found. The letter pre- 
fixes have the following meanings: 

C = Communications and Terminal Application Guide 

I = Internal Design 

L = Language Reference 

S = System Guide 

U = Utilities, Operator Commands, Program Preparation, Messages and 
Codes 

M = Multiple Terminal Manager Internal Design 

A = Indexed Access Method Internal Design 
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$$EDXLIB system name L-228, S-57 
$$EDXV0L system name L-228, S-57 
$A display active programs, 

operator command S-63, U-ll 
$ATTASK special task control 

block L-61 
$AUT0 link edit auto call data 

set S-403, U-401 
$B blank (clear) screen, operator 

command S-63, U-12 
$BSCTRCE trace utility for BSC 

lines C-61 
SBSCUT1 trace printing utility for 

BSC C-62 
$BSCUT2 test utility for BSC 

lines C-64 
$C cancel a program, operator 

command S-63, U-13 
$C0MPRES library compress S-64, 

U-57 
$C0PY copy data sets S-64, U-59 
SC0PYUT1 copy data sets with 

allocation S-64, U-64 
$CP change terminal's partition 

assignment command 

overview 1-73, S-63 
syntax U-14 
$D dump storage, operator command 

S-63, U-15 
$DASDI format disk or diskette 

S-64, U-68 
$DBUGNUC debug module description 

1-77 
$DEBUG debugging tool U-82 
$DIC0MP display composer 

command description U-106 
create partitioned data set 

member S-247 
invoking U-105 
overview S-67 
$DIINTR display interpreter U-150 



$DISKUT1 allocate/delete, list 
directory data 

$J0BUTIL procedure S-229 
allocate partitioned data set 

S-248 
command descriptions U-135 
overview S-64 
$DISKUT2 patch, dump, or clear 
member 

description U-142 
overview S-64 

printing I/O error logs S-275 
syntax U-143 
$DISKUT3 data management utility 
description S-315 
input to S-316 
request block contents S-317 
return codes S-319, U-444 
$DIUTIL display data base utility 

S-248, U-150 
$DUMP dump saved storage and 

registers utility U-163 
$E eject printer page, operator 

command S-63, U-16 
$EDIT1/$EDIT1N text editors 
command syntax 
EDIT U-174 
EDIT mode subcommands 

U-182 
END U-175 
LIST U-176 
READ U-177 
SUBMIT U-179 
WRITE U-180 
control keys U-172 
data set requirements U-169 
line editing commands U-203 
overview S-66, U-169 
summary of commands and 
subcommands U-171 
SEDXASM Event Driven Language 
compi ler 

features supported U-361 
internal overview 1-5, 1-211 
i nvoki ng 

with $J0BUTIL U-368 
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with $L U-370 
with session manager 
U-369 
listing program (SEDXLIST) 

U-370 
options U-358 
output U-359 

overlay program example 1-244 
overview S-71, U-356 
programming considerations 
U-361 

arithmetic expression 

operators U-365 
ATTNLIST U-365 
COPY statements U-362 
ECB and QCB U-362 
EQU U-365 

GETEDIT and PUTEDIT U-365 
instructions requiring 

support modules U-365 
IODEF statement placement 

U-364 
multiple declarations on 

DATA/DC U-363 
source line continuation 
U-361 
required data sets U-357 
usage example S-397 
using the compiler U-356 
$EDXATSR supervisor interface 

routine 1-48 
SEDXDEF hardware configuration 

editing to match hardware con- 
figuration S-117 
overview 1-5, 1-6 
storage map 1-7 
$EDXL language control data set of 

SEDXASM 1-221, U-357 
$EDXLIST compiler listing program 

U-370 
$EDXNUC supervisor data set 

in system generation S-126 
overview 1-5 
with $LINK utility U-399 
$EDXNUC supervisor data sets 

U-399 
$EXEC language emulator linkage 

1-279, 1-313 
$EXEC session manager option 

S-216, U-41 
$FONT 4978 character image tables 

utility S-68, U-205 
$FSEDIT full-screen editor, host 
and native 

data set requirements U-209 
options 

BROWSE U-213 
EDIT U-214 
END U-218 
READ U-216 
SUBMIT U-217 
WRITE U-216 
overview S-66, U-209 
primary commands U-218 
program function (PF) keys 

U-211 
scrolling U-210 
summary of options and 
commands U-212 
$HCFUT1 Host Communications 

Facility utility C-107 
$IAM Indexed Access Method load 

module S-155 
$IAM task error exit S-178 



$IAMUT1 Indexed Access Method 

utility S-148, U-235 
$IDEF $EDXASM instruction 
def i ni ti on 

description 1-241 
instruction format 1-226 
$IMAGE define screen image 
utility S-68, U-250 
usage example S-387 
$IMDATA subroutine S-303 

usage example S-375 
SIMDEFN subroutine S-301 

usage example S-375 
$IM0PEN subroutine S-300 

usage example S-374 
$IMPR0T subroutine S-302 

usage example S-375 
SINDEX subroutine, $EDXASM 1-233 
$INITDSK initialize or verify 

volume S-64, U-256 
$INITIAL automatic initialization 
and restart 

description S-129 
with session manager S-209, 
U-28 
$IOTEST test sensor I/O, list con- 
figuration S-67, U-263 
$J0BUTIL job stream processor 
S-69, U-271 

commands U-272 
set up procedure U-271 
usage example S-408, U-290 
$L load program, operator command 
internals 1-23 
overview S-63 
syntax U-17 
$LEMSG $LINK message data set 

U-401 
$LINK linkage editor 

data set requirements U-400 
description U-390 
in system generation 1-5 
i nvoki ng 

with SJOBUTIL U-405 
with $L U-405 
with session manager 
U-406 
overview S-71 
usage example S-402 
$LNKCNTL data set S-118 
$LOADER 1-19, 1-22 

module description 1-78 
$L0G I/O error logging utility 
description S-270, U-292 
overview S-67 
$LPARSE subroutine 1-240 
$M0VEV0L disk volume dump/restore 

S-65, U-294 
$P patch storage, operator 

command S-63, U-18 
$PACK/$UNPACK subroutines S-309 
$PDS partitioned data set utility 
in a program S-259 
overview S-65 
$PFMAP identify 4978 program 

function keys S-68, U-301 
$PREFIND prefind data sets and 

overlays S-69, U-302 
$PRT2780 spooled print utility 

C-72 
$PRT3780 spooled print utility 

C-72 
$RJE2780 remote job entry utility 
C-73, S-66 
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$RJE3780 remote job entry utility 

C-73, S-66 

$RMU (see Remote Management Util- 
ity) 
$SMCTL session manager program 

S-209, S-212 
$SMEND session manager program 

S-212 
$SMJ0BR session manager program 

S-212 
$SML0G session manager program 

S-212 
$SMMAIN session manager program 

S-210, S-212, U-28 
$SMML0G, logon menu for session 

manager S-212 
SSMMPRIM, primary option menu for 

session manager S-212, U-27, 

U-35 
SSMM02, program preparation sec- 
ondary option menu S-214, U-37 
$SMM03, data management secondary 

option menu S-215, U-39 
$SMM04, terminal utilities 

secondary option menu S-215, 

U-41 
$SMM05, graphics utilities second- 
ary option menu S-216, U-41 
$SMM06, execute program utilities 

secondary option S-216 
$SMM07, job stream processor 

utilities secondary option S-216 
$SMM08, communications utilities 

option S-217, U-43 
$SMM09, diagnostic utilities 

S-217, U-44 
$START supervisor entry point 

1-279, 1-313 
$ST0REMAP example 1-27 
$SYSC0M data area 1-12, 1-279, 

1-313, S-113 
$SYSL0G system logging device 

overview S-110 
$SYSL0GA alternate system logging 

devi ce 

overview S-lll 
$SYSPRTR system printer 

overview S-lll 
$S1ASM Series/1 macro assembler 
description U-372 
internals 1-5, 1-253 
overview S-9 

storage map, general 1-256 
$T set date/time, operator 

command S-63, U-19 
$TAPEUT1 tape management utility 

U-311 
$TCBCCB (ATTACH) L-59 
$TERMUT1 change terminal 

parameters S-68, U-334 
$TERMUT2 

process 4978 image or control 

store S-68, U-339 
restore 4974 image U-339 
$TERMUT3 send message to a 

terminal S-68, U-344 
STRAP class interrupt trap 

utility S-67, U-348 
$UNPACK/$PACK subroutines S-309 
SUPDATE object program converter 
description U-408 
in system generation 1-5 
overview S-69 
usage example S-407 



$UPDATEH object program converter 

(host) S-69, U-418 
$VARY0FF set disk, diskette, or 

tape offline S-63, U-20 
$VARY0N set disk, diskette, or 

tape online S-63, U-22 

with standard labeled tape 
S-237 
$W display date/time, operator 

command S-63, U-25 
#1 index register 1 L-6 
#2 index register 2 L-6 
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A after, $FSEDIT line command 

U-226 
A-conversion L-153 
A/I (see analog input) 
A/0 (see analog output) 
abort task level (SVC abend) 1-49 
ACCA terminal C-7, L-295 
Access Method, Indexed 

(see Indexed Access Method) 
ACTION, Multiple Terminal Manager 
CALL 

coding description C-130, 

L-360 
internals M-9 
overview C-117, L-29 
activate 

error logging, $L0G utility 

U-293 
realtime data member, RT 

$DIC0MP subcommand U-124 
stopped task, GO $DEBUG 

command U-93 
task supervisor execution 

state 1-43 
TRAP function of storage dump, 
$TRAP utility U-348 
AD 

add member, SDICOMP command 

U-106 
advance, SDICOMP subcommand 

U-lll 
advance X,Y (PDS) S-255 
assign define key, STERMUT2 
command U-342 
add 

add member, AD $DICOMP com- 
mand U-106 
null data set on tape volume, 

TA $TAPEUT1 command U-330 
options to the session 
manager S-224 
support for new I/O terminals 
1-117 

calling conventions 1-118 
code translation tables 

1-118 
linkage conventions 1-119 
terminal instruction 
modification 1-119 
ADD data manipulation instruction 
coding description L-52 
overview L-19 
precision table L-53 
address relocation translator 

1-71, S-42 
addressing indexing feature L-6 
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ADDV data manipulation 
i nstructi on 

coding description L-54 
index register use L-55 
overview L-19 
precision table L-55 
advance, AD $DIC0MP subcommand 

U-lll 
advance and prompting input, ter- 
minal I/O L-46 
AI (see analog input) 
AL 

allocate data member, $DIUTIL 

command U-151 
allocate data set, $DISKUT1 

command U-137 
allocate data set, $J0BUTIL 

command U-273 
allocate member, SDICOMP 
command U-107 
allocate 

data set 

$J0BUTIL command U-273 
AL $DISKUT1 command U-137 
ALLOCATE function C-214 
tape, TA $TAPEUT1 command 
U-333 
member 

$DIC0MP command U-107 
SDIUTIL command U-151 
$PDS S-261 
ALLOCATE function C-216, 1-166, 

1-174 
allowable precision table L-20 
alter member AL $DIC0MP command 

U-107 
alter terminal configuration, 

$TERMUT1 U-334 
alternate system logging device 

($SYSL0GA) S-47 
alternate tracks S-58, U-73, U-78 
ALTIAM Indexed Access Method 

subroutine S-167 
analog input S-49 

AI $I0TEST command U-268 
control block 1-129 
IODEF statement L-187 
overview S-49 
SBIO instruction L-263 
SENSORIO configuration 
statement L-39 
analog output 

AO SIOTEST command U-264 
control block 1-129 
description S-49 
IODEF statement L-186 
SBIO instruction L-264 
SENSORIO configuration 
statement L-39, S-84 
AND data manipulation instruction 
coding description L-57 
overview L-19 
AO (see analog output) 
application program 

automatic initialization and 

restart S-129 
indexed access S-149 
introduction L-l 
manager C-119 
preparation U-351 
size estimating S-344 
structure L-8 
support S-20 
ASCII terminals 
codes S-110 



configuring S-96 
devices supported C-6, S-14 
graphics L-26, S-46 
TERMINAL statement examples 
S-106 
ASMERROR, SEDXASM instruction 

1-230 
assembler 

(see $EDXASM) 
(see $S1ASM) 
(see host assembler) 
assi gn 

alternate for defective 4963 

sector, $DASDI utility U-78 
DEFINE key in 4978 control 
store, AD $TERMUT2 command 
U-341 
asynchronous communications con- 
trol adapter (see ACCA) 
AT set breakpoints and trace 

ranges, $DEBUG command U-90 
ATTACH task control instruction 
coding description L-59 
internals 1-44 
overview L-42, S-34 
attention handling, terminal I/O 

1-108, L-47, S-63 
attention keys, terminal I/O L-47 
attention list (see ATTNLIST) 
ATTN key (see attention handling) 
ATTNLIST task control statement 
$ATTASK L-61 
coding description L-61 
overview L-42, S-30 
attribute character, 3101 C-122 
autocall 

option, $LINK U-401 
AUTOCALL statement requirement 

(WXTRN) L-323 
automati c 

application initialization 

S-13, S-129 
application restart S-13, 
S-129 
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B before, $FSEDIT line command 

U-226 
backup disk or disk volume on 

tape, ST $TAPEUT1 command U-330 
backup dump restore utility, 

$M0VEV0L U-294 
base records, indexed data set 
definition S-149 
loading S-160 
basic exchange 

diskette data set copy utili- 
ty, $C0PY U-59 
basic supervisor and emulator (see 

supervi sor/emulator) 
batch job processing (see 

$J0BUTIL) 
BEEP, Multiple Terminal Manager 
CALL 

coding description C-137, 

L-361 
internals M-9 
overview C-117, L-29 
binary synchronous communications 
automatic retry S-17 
BSCAM/BSCAMU module 
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descriptions 1-80 
BSCLINE configuration state- 
ment C-42, S-76 
control flow (BSCAM) 1-147 
device data block (BSCDDB) 

1-133 
features C-35, S-16 
Host Communications Facility 

protocol 1-156 
instruction formats C-38, 

1-144 
multipoint operation C-36, 

S-16 
overview S-16 
point-to-point lines S-16 
Remote Management Utility 

requirements C-208 
sample programs C-59 
special labels for, 
description 1-149 
system internal design 1-133 
test utility, $BSCUT2 C-64 
trace printing routine, 

$BSCUT1 C-62 
trace routine, $BSCTRCE C-61 
blank screen, $B operator command 

S-63, U-12 
BLANK TERMCTRL function L-288 
BLDTXT subroutine, $EDXASM 1-237 
BLINK TERMCTRL function L-288 
BLP (see bypass label processing) 
BOT (begi nni ng-of-tape) L-40 
BOTTOM reposition line pointer, 

$EDIT1/N editor subcommand U-183 
boundary requirement, full-word 
DO L-34 
IF L-34 
PROGRAM L-225 
BP list breakpoints and trace 
ranges, $DEBUG command U-92 
breakpoints and trace setting, AT 

$DEBUG command U-90 
BROWSE display data set, $FSEDIT 

option U-213 
BSC (see binary synchronous 

communi cat i ons) 
BSCAM (see binary synchronous com- 
muni cati ons) 
BSCCLOSE BSC statement 1-144, 
1-148 

coding description C-38 
BSCDDB binary synchronous device 
data block 

description of 1-133 
equates 1-291 
BSCEQU L-ll 
BSCIA immediate action routine 

(BSC) 1-148 
BSCIOCB BSC statement C-39, 1-144 
BSCLINE configuration statement 

C-42, S-76 
BSCOPEN BSC statement C-44, 

1-145, 1-148 
BSCREAD BSC statement C-45, 

1-145, 1-148 
BSCWRITE BSC statement C-49, 

1-146, 1-148 
BSF (backward space file) L-75 
BSR (backward space record) L-75 
BTE, buffer table entry A-20 
BU build data member, $DIUTIL 

command U-153 
buffer 

table entry 

definition A-20 



description A-31 
terminal I/O buffer 
management 1-109 
BUFFER data definition statement 
coding description L-65 
overview L-17 
build data member, BU $DIUTIL 

command U-153 
building an indexed data set 

U-247 
burst output with electronic dis- 
play screens L-46 
bypass label processing U-311 
description S-244 
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change a key definition, 
$TERMUT2 command U-342 
copy line, $FSEDIT line 
command U-226 
CA cancel 

assembly, $EDXASM attention 

request U-358 
copy, $C0PYUT1 attention 

request U-64 
list option, $FSEDIT attention 

request U-217 
listing, SEDXLIST attention 
request U-358 
CAD copy all data members, 

$C0PYUT1 command U-64 
CALL 

copy all members, $C0PYUT1 

command U-64 
program control instruction 
coding description L-68 
Indexed Access Method 

syntax S-146 
Multiple Terminal Manager 

syntax L-359 
overview L-32, S-31 
program L-68 
subroutine L-68 
callable routines L-30 
CALLFORT program control 
i nstructi on 

coding description L-70 
overview L-32 
cancel 

$C operator command U-13 
assembly, CA $EDXASM attention 

request U-358 
copy, CA $C0PYUT1 attention 

request U-64 
dump, CA $DUMP command U-165 
list option, CA $FSEDIT 

attention request U-217 
listing, CA $EDIT/N attention 
request U-172 
CAP copy all programs, $C0PYUT1 

command U-64 
CC copy block, $FSEDIT line 

command U-226 
CCB 

equate table 1-292 

internals 1-105, 1-119 

i nterprocessor communications 

C-30 
use in terminal I/O support 
1-113 
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CCBEQU L-ll 
CD 

clear data set, $DISKUT2 com- 
mand U-144 
copy data set, $C0PY command 

U-61 
copy data set, $TAPEUT1 
command U-313 
CDATA, Multiple Terminal Manager 
CALL 

coding description C-139, 

L-362 
internals M-9 
overview L-29 
CDRRM equates C-292 
C6 copy all members (generic) 

$C0PYUT1 command U-64 
CH 

change hardcopy device, 

$BSCUT2 command C-70 
change host library, SUPDATEH 
command U-420 
chain, ECB/QCB/TCB 1-55 
CHAIN supervisor service routine 

1-54 
CHAIND supervisor service routine 

1-54 
CHAINE supervisor service routine 

1-54 
chaining L-27 
CHAINP supervisor service routine 

1-54 
change 

address assignment of termi- 
nal, RA $TERMUT1 command 
U-336 
base address, QUALIFY $DEBUG 

command U-101 
character string, CHANGE 
$EDIT1/N editor subcommand 
U-184 
character string, change 
$FSEDIT primary command 
U-219 
execution sequence, GOTO $DE- 

BUG command U-94 
graphics or report display 
profile, $DIC0MP utility 
U-105 
hardcopy device, CH $BSCUT2 

command C-7 
hardcopy device, RH $TERMUT1 

command U-338 
host library, CH $UPDATEH 

command U-420 
key definition in 4978 control 

store, C STERMUT2 U-342 
name of logical device, RE 

$TERMUT1 command U-337 
output volume, CV $UPDATE 

command U-409 
page formatting parameters of 
a terminal, CT $TERMUT1 
U-335 
partition assignment, $CP 

operator command U-14 
realtime data member name RT 

($PDS) S-258 
tape label support U-322 
volume 

CV $BSCUT1 command C-62 
CV $C0PYUT1 command U-64 
CV $DISKUT1 command U-137 
CV SDISKUT2 command U-143 
CV $UPDATEH command U-418 



character constants L-89 
character image table U-205 
CHGPAN, Multiple Terminal Manager 
CALL 

coding description C-135, 

L-364 
internals M-9 
overview C-124, L-29 
CL clear work data set, $FSEDIT 

primary command U-221 
class interrupt vector table 

1-10, 1-277 
class interrupts, intercepting, 

$TRAP utility U-348 
clear 

data set, CD $DISKUT2 command 

U-144 
screen, $B operator command 
U-12 
CLOSE Host Communications Facili- 
ty, TP operand C-90 
CLSRU (close tape data set) L-75 
cluster, indexed data set S-200 
CM copy member 

$C0PYUT1 command U-64 
$DIUTIL command U-155 
CMDEQU L-12 
CMDSETUP 1-13, 1-67 
CNG copy all members 
(non-generic) ,$C0PYUT1 command 
U-64 
CO command, $RJE2780/$RJE3780 

C-76 
COBOL 

execution requirements S-23 
link editing S-71 
overview S-7 
program preparation 
requirements S-23 
use with Multiple Terminal 
Manager C-193 
code translation 

new support tables 1-111 
terminal I/O layer 2 1-109 
code words, task L~8 
COLS display columns, $FSEDIT line 

command U-228 
command area, $EDXASM 1-214 
command descriptions U-235 
COMMAND send to host, 

$RJE2780/$RJE3780 C-75 
command table 1-68, 1-282, 1-301 
common data area (see $SYSC0M) 
common emulator setup routine 
command table 1-13, 1-282, 

1-301 
operating conventions 1-67 
communication error function 

1-166 
communications utilities 
$BSCTRCE C-61 
$BSCUT1 C-62 
$BSCUT2 C-64 
$HFCUT1 C-107 
$PRT2780 C-72 
$PRT3780 C-72 
$RJE2780 C-73 
$RJE3780 C-73 
$RMU C-282 
communications utilities (session 

manager) S-217, U-42 
communications vector table 1-11, 

1-278, 1-313 
compiler (see $EDXASM) 
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completion codes (see return 
codes) 

$EDXASM U-436 
$IAMUT1 U-437 
SJOBUTIL U-439 
$LINK U-440 
SUPDATE U-443 
compress 

data base, CP SDIUTIL command 

U-154 
library, $C0MPRES utility 
U-57 
compressed byte string S-309 
CONCAT graphics instruction 
coding description 1-72 
overview L-26 
concatenating indexed data sets 

S-167 
concurrent access L-27 
concurrent execution L-42 
configuration statements S-75 
configure terminal CT $TERMUT1 

command U-335 
connecting an indexed data set 

S-159 
continuation, source program line, 

$EDXASM U-361 
control, device instruction level 

L-24 
control block (see DSCB) 
control block and parameter 
tables 

BSCEQU 1-133, 1-291, L-ll 
CCBEQU (see also CCB) L-ll 
CMDEQU (see also emulator 

command table) L-12 
DDBEQU 1-92, 1-308, L-12 
DSCBEQU (see also DSCB) L-12 
ERRORDEF L-12 
FCBEQU A-20, L-12 
IAMEQU L-12 
PROGEQU 1-312, L-13 
referencing 1-289 
TCBEQU (see also TCB) L-13 
control block module (ASMOBJ) 

description 1-76 
CONTROL IDCB command L-175 
control keys for text editors 

U-172 
control records, $LINK U-396 
control statements, program 
listing L-28 
task L-42 

terminal I/O forms control 
L-45 
CONTROL tape instruction L-74 
conversi on 

algorithm for graphics 1-201 

alphameric data L-152 

def i ni ti on 

EBFLCVT module description 

1-80 
floating point/binary 1-205 
numeric data L-148 
program modules by $UPDATE/H 

U-418 
terminal I/O binary/EBCDIC 
1-110 
CONVTB data formatting 
i nstructi on 

coding description L-79 
internals 1-207 
overview L-18 
CONVTD data formatting 
i nstructi on 



coding description L-82 
internals 1-207 
overview L-18 
copy 

block of text, CC $FSEDIT line 

command U-226 
data members, all, CAD 

$C0PYUT1 command U-64 
data set, CD $C0PY command 

U-61 
data sets with allocation, 

$C0PYUT1 utility U-64 
line of text, C $FSEDIT line 

command U-226 
member 

CM $C0PYUT1 command U-64 
CM $DIUTIL command U-155 
members 

all, CALL SC0PYUT1 com- 
mand U-64 
generic, CG $C0PYUT1 

command U-64 
non-generic, CNG SC0PYUT1 
command U-64 
programs, all, CAP $C0PYUT1 

command U-64 
text, $EDIT1/N editor 

subcommand U-186 
volume, CV $C0PY command U-62 
copy code library, instruction 

parsing ($EDXASM) 1-222 
COPY instruction 

coding description L-86 
overview L-33 
Count record C-256 
CP compress data base, SDIUTIL 

command U-154 
CR invoke $DISKUT1, SIAMUT1 

command U-236 
create 

character image tables, $F0NT 

U-205 
source data set, SFSEDIT 

U-214 
supervisor for another 

Series/1 S-132 
unique labels, $SYSNDX 
($EDXASM) 1-242 
create indexed data set S-156 
cross partition instructions 1-71 
cross partition services S-286 
CSECT list, supervisor 
Version 1.1 S-347 
Version 2 S-357 
CSECT program module sectioning 
statement 

coding description L-87 
overview L-33 
CT 

change tape drive attributes, 

$TAPEUT1 command U-315 
configure terminal, $TERMUT1 
command U-335 
CV 

change output volume U-409 
$UPDATE command U-409 
$UPDATEH command U-418 
change volume 

$BSCUT1 command C-62 
$C0PYUT1 command U-64 
$DISKUT1 command U-137 
$DISKUT2 command U-143 
copy volume, $C0PY command 
U-59 
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CYCLE 

coding description C-132, 
L-365 

internals M-9 

overview C-116, L-29 
cylinder S-60 
cylinder track sector (CTS) U-135 



D delete line, $FSEDIT line com- 
mand U-228 
D/I (see digital input) 
D/0 (see digital output) 
data 

conversion (see conversion) 
conversion specifications (see 

also conversion) L-146 
definition statements L-17 
files for $S1ASM 1-254 
floating-point arithmetic 

instructions L-20 
formatting functions L-18 
formatting instructions L-18 
integer and logical 
instructions L-19 
length of transmitted, host 

communications 1-159 
management S-45 
management system, Indexed 

Access Method L-27 
manipulation instructions 

L-19 
record contents, text editor 

1-325 
representation L-20 

floating-point L-20 
integer L-19 
terminal input L-45 
terminal output L-45 
transfer initialization, 

terminal I/O support 1-112 
transfer rates, Host 

Communications Facility C-84 
transfer ready, (DTR) BSCOPEN 
1-148 
Data Collection Interactive S-ll 
DATA data definition statement 
coding description L-88 
overview L-17 
data management utilities 
$C0MPRES S-64, U-57 
$C0PY S-64, U-59 
$C0PYUT1 S-64, U-64 
$DASDI S-64, U-68 
$DISKUT1 S-64, U-135 
$DISKUT2 S-64, U-142 
$DISKUT3 S-315 
$IAMUT1 S-148, U-235 
$INITDSK S-64, U-256 
SMOVEVOL S-65, U-294 
$PDS S-247 
$TAPEUT1 U-311 
session manager S-215, U-38 
data manipulation, vector L-19 
data manipulation instructions 

L-19 
Data record C-257 
data representation, terminal I/O 

L-45 
data set 

allocati on/del eti on 



$DISKUT1 U-137 
$DISKUT3 S-315 
$J0BUTIL U-273 
$PDS S-248 
session manager U-29 
characteristics, HCF C-83 
format 

$FSEDIT U-210 
$PDS S-249 
$PRT2780 C-72 
$PRT3780 C-72 
naming conventions C-82, S-56 
transfer 

RECEIVE function C-243 
SEND function C-247 
utilities (see data management 
uti li ti es) 
data set naming conventions, Host 

Communications Facility C-82 
data-set-shut-down condition 

S-179 
date/time 

di splay, $W operator command 

U-25 
set, $T operator command U-19 
DC data definition statement 
coding description L-88 
overview L-17 
DCB EXIO control statement 
coding description L-91 
overview L-24 
DCE directory control entry 

format 1-88 
DCI (Data Collection Interactive) 

S-ll 
DD block delete, $FSEDIT line 

command U-228 
DDB disk data block 

description 1-92 
equate table 1-308 
DDBEQU L-12 
DE delete member 

$DISKUT1 command U-137 
$DIUTIL command U-156 
delete data set, $J0BUTIL 
command U-274 
deadlocks C-238, S-180 
debug 

$EDXASM overlay programs 

1-248 
aids (see also diagnostic 

aids) S-18 
facility, $DEBUG utility U-82 
def i ne 

horizontal tabs, HTAB $IMAGE 

command U-252 
image dimensions, DIMS $IMAGE 

command U-251 
indexed data set, DF $IAMUT1 

command U-237 
null representation, NULL 

$IMAGE command U-253 
vertical tabs, VTAB $IMAGE 
command U-254 
DEFINEQ queue processing 
statement 

coding description L-94 
overview L-37 
definition statements, data L-17 
delete 

data set 

$J0BUTIL command U-274 
DELETE function C-216 
tape data set, TA $TAPEUT1 
command U-333 
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elements, IN $DICOMP command 

U-107 
member 

$PDS S-261 

DE $DISKUT1 command U-137 
DE $DIUTIL command U-156 
text 

$EDIT1(N) editor subcom- 
mand U-188 
line, D $FSEDIT line 
command U-228 
with $PREFIND U-305 
DELETE function C-216, 1-166, 

1-174 
DELETE instruction 

coding description L-329 
overview L-27, S-147 
return codes L-330 
DEQ task control instruction 
coding description L-95 
internals 1-59 
overview L-42, S-33 
supervisor function 1-46 
DEQBSC dequeue BSC DDB routine 

1-149 
DEQT terminal I/O instruction 
coding description L-97 
overview L-44, S-47 
DETACH task control instruction 
coding description L-98 
internals 1-45 
overview L-42, S-30 
detached, task supervisor 

execution state 1-43 
devi ce 

busy (EXOPEN) L-129 

data block description, EXIO 

1-123 
instruction level control 

L-24 
interrupt handling, EXIO 

1-125 
test utility, $I0TEST U-263 
vector table 1-11, 1-278 
DF define indexed file, $IAMUT1 

command U-237 
DI (see digital input) 
diagnosti c 

aids S-265 

summarized S-18 
uti li ti es 

$DEBUG U-82 
$DUMP U-163 
$I0TEST U-263 
$L0G U-292 
STRAP U-348 
with session manager 
S-217, U-38 
digital input 

SIOTEST command U-266 
digital I/O control block 

1-129 
direct output, $DIC0MP subcom- 
mand U-112 
direct output to another 

device ($PDS) S-255 
di splay parameters, $IAMUT1 

command U-239 
external sync, XI $I0TEST 

command U-266 
IODEF statement L-186 
overview S-48 
SBIO instruction L-265 
SENSORIO configuration 
statement S-84 



digital output 

digital I/O control block 

1-129 
DO SIOTEST command U-265 
external sync, XO $I0TEST 

command U-266 
IODEF statement L-186 
overview S-48 
SBIO instruction L-267 
SENSORIO configuration 
statement L-84 
DIMS define image dimensions, 

$IMAGE command U-251 
direct access common I/O module, 

DISKIO, description 1-77 
direct access storage device 

organization S-52 
direct output, DI $DIC0MP 

subcommand U-112 
di rectory 

control entry (DCE) 1-88 
entries S-249 
member entry (DME) 1-89 
disaster recovery from tape, RT 

$TAPEUT1 command U-326 
DISCONN Indexed Access Method 
CALL 

coding description L-332 
overview L-27, S-148 
return codes L-333 
DISCONNECT Multiple Terminal 

Manager utility C-119, C-159 
disconnecting an indexed data set 

S-159 
DISK configuration statement S-78 
di sk/di skette 

capacity S-58 
data block (DDB) 1-92 
fixed-head S-15, S-61 
I/O task 1-95 
IPL S-16, S-61 
primary volume S-60 
resident loading code 1-19 
secondary volume S-60 
symbolic addressing L-10 
uti li ties 

$C0MPRES S-64, U-57 
$C0PY S-64, U-59 
$C0PYUT1 S-64, U-64 
$DASDI S-64, U-68 
$DISKUT1 S-64, U-135 
$DISKUT2 S-64, U-142 
$DISKUT3 S-315 
$IAMUT1 S-148, U-235 
$INITDSK S-64, U-256 
$M0VEV0L S-65, U-294 
$PDS S-247 
utility function table U-49 
volume S-16, S-52 
disk I/O instructions L-22 
DISKIO direct access common I/O 

module description 1-77 
display (see also list) 

character image tables, DISP 

$F0NT command U-205 
contents of storage or 
registers, LIST $DEBUG com- 
mand U-95 
control member ($PDS) S-250 
control member format ($PDS) 

S-252 
initial data values for image 

S-303 
processor composer, SDICOMP 
U-105 
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processor interpreter* 

$DIINTR U-150 
processor utility, $DIUTIL 

U-150 
processor utility, general 

description U-105 
profile elements ($PDS) S-252 
protected and null fields of 

an image S-302 
report line items ($PDS) 

S-255 
status of all tasks, WHERE 

$DEBUG command U-102 
storage, $D operator command 

5-63, U-15 
time and data, TD ($PDS) 

S-258 
time and date, $W operator 

command S-63, U-25 
utility program set ($PDS) 

S-248 
variable, VA($PDS) S-254 
4978 program function keys, 
$PFMAP utility U-301 
DISPLAY TERMCTRL function L-288 
DIVIDE data manipulation 
instructi on 

coding description L-99 
overview L-19 
precision table L-100 
DME directory member entry 
format 1-89 

updated by SETEOD S-324 
DO 

digital output (see digital 

output) 
program sequencing 
i nstructi on 

coding description L-101 
overview L-34 
double-precision L-19 

floating-point arithmetic 

L-21 
integer and logical L-19 
DOWN move line poiner, $EDIT1/N 

editor subcommand U-189 
DP 

dump to printer 

SDISKUT2 command U-144 
$TAPEUT1 command U-317 
print trace file, SBSCUT1 
command C-62 
DR draw symbol, $DIC0MP 

subcommand U-112 
DR draw symbol ($PDS) S-254 
draw 

line, LI $DIC0MP subcommand 

U-120 
line relative LR ($PDS) S-257 
symbol, DR $DIC0MP subcommand 
U-112 
DS data set identifier, $J0BUTIL 

command U-275 
DSCB data set control block 
statement 

coding description L-105 
equate table, DSCBEQU 1-311 
for tape, internals 1-99 
internals 1-92 
overview L-22 
DSCBEQU L-12 
DSECT (see control block and 

parameter equate tables) L-ll 
DSOPEN subroutine 

description S-322 



DSR data set ready in BSCOPEN 

1-148 
DTR data transfer ready in 

BSCOPEN 1-148 
DU 

dump on terminal, $DISKUT2 

command U-144 
dump trace file on terminal, 
$BSCUT1 command C-62 
dump 

restore volume utility 

$M0VEV0L U-294 
storage partition, DUMP 

function C-218 
to printer 

$DUMP utility U-163 
DP $DISKUT2 command U-143 
DP $TAPEUT1 command U-317 
PR $DIC0MP command U-108 
to terminal 

$DUMP utility U-163 
DP $TAPEUT1 command U-317 
DU SDISKUT2 command U-143 
PR SDICOMP command U-108 
trace file on printer, DP 

$BSCUT1 command C-62 
trace file on terminal, DU 
$BSCUT1 command C~62 
DUMP function C-218, 1-166, 1-175 
D4969, tape device handler module 
description 1-82 



E-conversion (Ew.d) L-150 
EBFLCVT, EBDIC to floating-point 
conversion 1-205 

module description 1-80 
EC control echo mode, $IAMUT1 

command U-240 
ECB task control statement 

coding description L-107 
internals 1-55 
overview L-42, S-30 
with SBIOCB 1-128 
EDIT 

begin editing source data, 

$EDIT1/N command U-174 
create or change data set, 

$FSEDIT option U-214 
enter edit mode, $F0NT 

command U-205 
enter edit mode, $IMAGE 
command U-251 
edit data set subroutine examples, 

text editor 1-326 
editor subcommands, $EDIT1/N 

U-182 
EDL (see Event Driven Language) 
compiler ($EDXASM) U-356 
instruction format 1-67 
interpreter, EDXALU, module 

description 1-77 
operation codes 1-67 
EDXALU Event Driven Language 
interpreter description 1-5, 
1-77 
EDXFLOAT floating-point operations 

module description 1-79 
EDXINIT supervisor initialization 
control module 1-15 
description 1-81 
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EDXLIST host listing formatter 

U-383 
EDXSTART supervisor initialization 

task module description 1-81 
EDXSVCX/EDXSVCXU task supervisor 
addr. trans, support desc 1-5, 
1-76 
EDXSYS system data tables, 

description 1-75 
EDXTIMER 7840 timer feature card 

module description 1-80 
EDXTIMR2 4952 timer module 

description 1-80 
EDXTIO terminal I/O 

EDXTIO/EDXTIOU module 

description 1-78 
internals 1-105 
EJECT listing control statement 
coding description L-10 9 
overvi ew L-28 
eject printer page 

$E operator command U-16 
ELSE program sequencing 
i nstructi on 

coding description L-110, 

L-178 
overview L-34 
emulator (see 

supervi sor/emulator) 
emulator command table 1-13, 

1-282, 1-301 
emulator functional flow 1-69 
emulator setup routine 1-67 

command table I~13, 1-282, 
1-301 
EN end program, $IAMUT1 command 

U-235 
END 

$LINK control record U-396 
option selection, $EDXASM 

command U-358 
option selection, $EDXLIST 

command U-371 
option selection, $S1ASM 

U-378 
primary command input, $FSEDIT 

primary command U-221 
task control statement 

coding description L-lll 
overview L-42 
end display, EP $DIC0MP 

subcommand U-118 
end-of-file, indicating with 

SETEOD S-324 
ENDATTN task control instruction 
coding description L-112 
overview L-42, S-30 
ENDDO program sequencing 
i nstructi on 

coding description L-103, 

L-113 
overview L-34 
ENDIF program sequencing 
i nstructi on 

coding description L-114, 

L-178 
overview L-34 
ENDPROG task control statement 
coding description L-115 
overview L-42, S-30 
ENDSEQ Indexed Access Method CALL 
coding description L-334 
overview L-27, S-147 
return codes L-335 



ENDSPOOL switch spool to print, 

$RJE2780/$RJE3780 C-75 
ENDTASK task control instruction 
coding description L-116 
overview L-42, S-30 
ENQ task control instruction 
coding description L-117 
internals 1-60 
overview L-42, S-33 
supervisor function 1-45 
ENQT terminal I/O instruction 
S-293 

coding description L-119 
overview L-44, S-47 
enqueue, task supervisor function 

(see ENQ) 
entering and editing source state- 
ments S-66, U-192 
entry points, supervisor 
Version 1.1 S-347 
Version 2 S-357 
ENTRY program module sectioning 
statement 

coding description L-121 
overview L-33 
EOF (end-of-file) L-74 
EOJ end of job, $J0BUTIL command 

U-276 
EOP end of nested procedure, 

SJOBUTIL command U-276 
EOR data manipulation instruction 
coding description L-122 
overview L-19 
EOT (end-of-tape) L-41 
EP end display, SDICOMP 

subcommand U-118 
EQ (equal) L-34 

EQU data definition instruction 
coding description L-124 
overview L-17 
equate tables 

SEDXASM compiler common area 

1-214 
BSCDDB, BSC line control 

block 1-291 
CCB, terminal control block 

1-292 
DDB, disk/diskette control 

block 1-308 
DDB for sensor I/O 1-309 
DSCB, data set control block 

1-311 
emulator command table 1-282, 

1-301 
Indexed Access Method A-19 
parameter and control block 

L-ll 
program header 1-312 
referencing 1-30 
supervisor 1-279, 1-313 
TCB, task control block 1-314 
ERASE terminal I/O instruction 
coding description L-126 
overview L~44, S-47 
error codes (see return codes) 
error handling 

I/O error logging S-270 
Indexed Access Method error 

exit S-178 
Remote Management Utility 

C-277 
software trace S-265 
task error exit S-33, S-268 
terminal I/O L-44 
ERRORDEF L-12 
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ERRORS list error option 
SEDXASM command U-358 
$EDXLIST command U-370 
estimating storage (see storage 

estimati ng) 
event control block (see ECB) 
Event Driven Language (see EDL) 
EX exercise tape, STAPEUT1 com- 
mand U-319 
EXEC function C-220, 1-166, 1-178 
EXEC load and execute program, 

$J0BUTIL command U-277 
execute program 

EXEC function C-220 
PASSTHRU function C-225 
SHUTDOWN function C-251 
utilities (session manager) 
S-216 
executing, task supervisor exe- 
cution state 1-43 
exercise tape, EX $TAPEUT1 

command U-319 
EXFLIH command start 1-125 
EXIO control instruction 

coding description L-128 
EXIODDB device data block 

description 1-123 
internals 1-125 
overview L-24, S-51 
EXIOCLEN, EXIO termination module 

1-126 
EXIODEV configuration statement 

S-82 
EXIOINIT, system initialization 

1-125 
EXOPEN EXIO control instruction 
coding description L-129 
internals 1-125 
interrupt codes L-132 
overview L-24 
return codes L-131 
external sync DI/DO, XI/XO SIOTEST 

command U-266 
EXTRACT, Indexed Access Method 
CALL 

coding description L-336 
overview L~26, S-148 
return codes L-337 
EXTRN program module sectioning 
statement 

coding description L-134 
overview L~33 



F-conversion (Fw.d) L-149 
FADD data manipulation 
instruction 

coding description L-135 
overview L-19 
return codes L-136 
FAN, Multiple Terminal Manager 
CALL 

coding description C-139, 

L-366 
overview L~31 
FCA file control area, Multiple 

Terminal Manager C-143 
FCB file control block for Indexed 
Access Method 

definition A-9, A-20 
description A-ll, A-21, S-194 



location A-20 

map provided by FCBEQU S-155 
FCBEQU Indexed Access Method copy 

code module L~12, S-155 
FDIVD data manipulation 
i nstruct i on 

coding description L-137 
overview L~19 
return codes L-138 
FETCH Host Communications 

Facility, TP operand C-92 
fetch record ($PDS) S-261 
fetch status, FE $HCFUT1 command 

C-110 
file L-75 

backward space file (BSF) 

L-75 
control area (see FCA) 
control block (see FCB) 
definition L-40 
forward space file (FSF) L-75 
manager, Multiple Terminal 

Manager M~8 
tape control commands L-75 
FILEIO, Multiple Terminal Manager 
CALL 

coding description C-141, 

L-367 
internals M-9 
overview C-118, L-29 
FIND 

editor commands 

character string, $EDIT1/N 

subcommand U-191 
character string, $FSEDIT 
primary command U-222 
program sequencing 
i nstructi on 

coding description L-139 
overview L-34 
FINDNOT program sequencing 
i nstructi on 

coding description L-141 
overview L-34 
FIRSTQ queue processing 
i nstructi on 

coding description L-143 
overview L-37, S-32 
fixed-head devices S-61 
fixed storage area, contents 1-9 
f loati ng-poi nt 

arithmetic instruction 
equates 1-283, 1-303 
arithmetic instructions L-20 
binary conversions 1-205 
command entries module, 

NOFLOAT, description 1-79 
operations module, EDXFLOAT, 

description 1-79 
return codes L~21 
FMULT data manipulation 
i nstructi on 

coding description L-144 
overview L-19 
return codes L-145 
format 

i llustrated L-5 
instruction (general) L-3 
FORMAT data formatting statement 
*A' conversion L-153 
'E' conversion L-150 
'F' conversion L-149 
'H T conversion L-152 
'I' conversion L-148 
coding description L-146 



/T^ 



^. 



y 



340 SC34-0316 



o 



conversion of alphameric data 

L-153 
conversion of numeric data 

L-148 
data conversion specifica- 
tions L-146 
module names L-18 
multiple field format L-155 
overview L-18 
repetitive specification 

L-155 
using multipliers L-155 
X-type format L-154 
formatted screen images S-300, 

U-250 
formatting instructions, data 

L-18 
forms control 

burst output with electronic 

di splay screens L-46 
forms interpretation L-46 
output line buffering L~46 
parameters, terminal I/O L-44 
terminal I/O L-45 
FORTRAN IV 

execution requirements S-24 
link editing S-71 
overview S-6 
program preparation 
requirements S-24 
use with Multiple Terminal 
Manager C-197 
FPCONV data manipulation 
i nstructi on 

coding description L-157 
overview L-19 
free pool in Indexed Access 

Method L-27 
free space 

definition S-148 
estimating S-168 
in Indexed Access Method L-27 
free space entry 1-90 
FREEMAIN storage allocation 

function 1-25 
FSE free space entry 1-90 
FSR (forward space record) L-75 
FSUB data manipulation 
i nstructi on 

coding description L-159 
index registers L-160 
overview L-19 
return codes L-160 
FTAB, Multiple Terminal Manager 
CALL 

coding description C-138, 

L-372 
overview C-124, L-31 
return codes L-373 
full-screen static configuration 

S-293 
full-screen text editor host and 

native, $FSEDIT U-209 
full-word boundary requirement 
DO L-34 
IF L-34 
PROGRAM L-225 
function process overlays 1-162 
function process subroutines 
1-162, 1-170 

new subroutines 1-187 



function table 1-164, 1-167 



GE (greater than or equal) L-34 
general instruction format L-3 
generating the supervisor S-115 
GENxxxx macro 1-120 
GET Indexed Access Method CALL 
coding description L-338 
overview L-27, S-147 
return codes L-340 
GETEDIT data formatting 
i nstructi on 

coding description L-162 
overview L-18 
GETMAIN storage allocation 

instruction 1-25 
GETPAR3 1-69 

GETSEQ Indexed Access Method CALL 
coding description L-342 
overview L-27, S-147 
return codes L-343 
GETSTORE TERMCTRL function L-288 
GETTIME timing instruction 

coding description L-167 
overview L-50, S-32 
GETVAL subroutine, $EDXASM 1-234 
GETVALUE terminal I/O instruction 
coding description L-169 
overview L-44, S-47 
GIN graphics instruction 

coding description L-172 
overview L-26 
global area, $EDXASM 1-224 
GLOBAL ATTNLIST L-61 
GO activate stopped task, $DEBUG 

command U-93 
GOTO 

change execution sequence, 

$DEBUG command U-94 
coding sequencing instruction 
coding description L-173 
overview L-34 
graphi cs 

conversion algorithm 1-201 
functions overview L-26 
hardware considerations C-6, 

C-300 
instructions L-26 
CONCAT L-72 
GIN L-172 
PLOTGIN L-210 
SCREEN L-270 
XYPLOT L-324 
YTPLOT L-325 
requirements L-26 
terminals S-46 
uti li t i es 

$DIC0MP U-105 
$DIINTR U-127 
$DIUTIL U-150 
session manager S-216, 

U-40 
summarized S-64, U~5 
GT (greater than) L-34 
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H-conversion L-152 

hardcopy function for terminals 

PF6 1-114, U-7 
hardware levels S-30 
HCF (see Host Communications 

Faci 1 i ty) 
HDR1 tape label S-239 
header labels, tape S-235 
header record 

Remote Management Utility 
C-209 
header record format, text editor 

1-323 
HELP list debug commands, $DEBUG 

command U-94 
highet — level index block S-197 
horizontal tabs, defining with 

$IMAGE U-252 
host assembler U-382 
Host Communications Facility 
C-81, 1-153 

data set naming conventions 

C-82 
Program Preparation 

System/370 1-153, U-382 
TPCOM module description 1-81 
utility program, $HCUT1 C-107 
host program, Remote Management 

Utility C-205 
host system considerations C-83 
HOSTCOMM configuration statement 

S-83 
HX display hex words, $DIC0MP 
subcommand U-118 



initialization, SINITDSK com- 
mand U-257 
insert line, $FSEDIT line 
command U-229 
I-conversion (Iw) L-148 
I/O device instruction level L-24 
I/O error logging 

data set list utility, 

$DISKUT2 U-142 
device table S-276 
invoking S-273, U-292 
log control record S-276 
log data set U-292 
LOG macro 

equates S-278 
syntax S-272 
printing the errors S-275 
recording the errors S-270 
tape log entries S-245 
utility, $L0G U-292 
I/O functions 

disk/diskette 1-95, L-22 

summarized S-46 
EXIO control 1-123, L-24 

summarized S~51 
HOSTCOMM configuration 
statement L-39, S-83 
overview S-45 
sensor 1-127 

summarized S-51 



tape L-40, L-75 
terminal S-46 
timers L-50, S-32 
I/O instructions 
disk L-22 
diskette L-22 
tape L-40 
IACB indexed access control block 
built by connecting data set 

S-159 
definition A-20 
description A-35 
location A-14 
IAM Indexed Access Method link 

module S-155 
IAMEQU Indexed Access Method copy 

code module L-12, S-155 
IDCB EXIO control statement 
coding description L-175 
overview L-24 
IDCHECK function C-223, 1-166, 

1-177 
identification, verify 
host system C-223 
IDCHECK function C-223 
remote system C-223 
IF program sequence instruction 
coding description L-177 
overview L-34 
II insert block, $FSEDIT line 

command U-231 
IIB interrupt information byte, 

Multiple Terminal Manager C-128 
IM insert member 

$DIC0MP subcommand U-118 
$PDS S-257 
image dimensions, define, DIMS 

$IMAGE command U-251 
image store U-205 
immediate action routines 1-46 
binary synchronous access 

method 1-149 
specifying maximum number 

S-88 
task supervisor 1-48 
immediate data L-4 
IN 

initialize data base, SDIUTIL 

command U-157 
insert or delete elements, 
$DIC0MP command U-107 
INCLUDE SLINK control record 

U-398 
INCLUDE statement requirement 

(EXTRN) L-134 
index block A-20, A-33 

overview S-151 
index entry A-12 
index record contents, text 

editor 1-323 
index registers 

floating-point operations 

using L~21 
integer operations using L~19 
software introduction L-6 
indexed access control block (see 

IACB/ICB) 
Indexed Access Method L~26, L-327 
$IAM load module S-155 
$IAMUT1 utility U-235 
overview S-148 
parameters S-187 
used in data set 
reorganization S-166 
application program 
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preparati on 

$J0BUTIL procedure S-158 
link edit control S-158 

CALL instruction syntax L-68, 
S-146 

CALL processing A-4 

coding instructions L-327 

control block linkages A-15 

control flow A-3 

data block location 
calculation A-9 

devices supported by S-146 

diagnostic aids A-10 

I/O requests 

DELETE L-329, S-147 
DISCONN L-332, S-148 
ENDSEQ L-334, S-147 
EXTRACT L-336, S-148 
GET L-338, S-147 
GETSEQ L-341, S-147 
LOAD L-344, S-147 
PROCESS L-347, S-147 
PUT L-350, S-147 
PUTDE L-352, S-147 
PUTUP L-354, S-147 
RELEASE L-356, S-147 

IAM link module S-155 

operation S-148 

overview L-27, S-145 

performance S-205 

program preparation procedure 
S-155 

record processing A-6 

request processing A-5 

request verification A-10 

storage requirements S-204 
indexed applications, planning and 
desi gni ng 

connecting and disconnecting 
data sets S-159 

handling errors 

data-set-shut-down condi- 
tion S-179 
deadlocks S-180 
error exit facilities 

S-178 
long-lock-time condition 

S-180 
system function return 
copies S-179 

loading* base records S-160 

processing indexed data sets 
delete S-165 
direct read S-161 
direct update S-162 
extract S-165 
insert S-146 
sequential read S-162 
sequential update S-146 

resource contention S-181 
indexed data set 

base records S-149 

building U-247 

concatenating with ALTIAM 
subroutine S-167 

control block arrangement A-8 

creation with $IAMUT1 utility 
U-236 

formatting S-187 
procedure S-156 

design A-7 

determining size and format 
U-247 

format 

blocks S-192 



cluster S-200 

data block S-194 

file control block (FCB) 

S-151, S-194 
free blocks S-200 
free pool S-203 
free records S-200 
free space S-184 
highei — level index block 

S-197 
index S-195 
index block S-194 
introduction S-151 
last cluster S-203 
primary-level index block 

(PIXB) S-152, S-195 
relative block number 

(RBN) S-152 
reserve blocks S-201 
reserve index entries 

S-202 
second-level index block 

(SIXB) S-152, S-197 
sequential chaining S-203 
loading and inserting records 

S-150 
mai ntenance 

backup and recovery S-165 
deleting S-167 
dumping S-167 
recovery without backup 

S-166 
reorganization S-166 
overview S-148 
physical arrangement A-8 
preparing the data 

defining the key S-166 
estimating free space 

S-168 
selecting the block size 
S-167 
putting records into S-149 
RBN, relative block number 

A-7, A-12 
record locking S-146, S-160 
verification A-ll 
indexed data set, defining U-237 
indexed file (see Indexed Access 
Method) 
indexing, address feature L-6 
initial program load (see also 

IPL) 1-15 
i ni tiali zat i on 

automatic application S-129 
disk (4962) U-68, U-73 
disk (4963) U-68, U-78 
diskette (4964,4966) U-68 
libraries, $INITDSK utility 

U-256 
modules 1-16 
nucleus 1-15 
Remote Management Utility, 

internals 1-166, 1-171 
tape, $TAPEUT1 utility U-322 
task 1-15 
initialize data base, IN $DIUTIL 

command U-157 
initializing secondary volumes 

S-132 
INITMODS, initialization modules 

1-16 
INITTASK, initialization task 

1-15 
input, terminal I/O L-46 
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IM SDICOMP subcommand 
address register (see 
and statements - over- 



Input Buffer, Multiple Terminal 
Manager C-116 

contents during 4978/4979/3101 

buffer operation C-129 
description C-116 
input data parsing, description 

of 1-218 
Input Error function 1-166, 1-182 
input/output (see I/O) 
input output control block (see 

IOCB) 
INPUT switch to input mode, 

$EDIT1/N editor subcommand U-192 
i nsert 

block, II SFSEDIT line com- 
mand U-231 
elements, IN $DIC0MP command 

U-107 
line, I $FSEDIT line command 

U-229 
member, 
U-118 
nstruct i on 
IAR) 

nstructi on 
view L-15 

nstruction definition and 
checking (SEDXASM) 1-241 
nstruction format, Event Driven 
Language 1-67, L~3 
nstruction format, general L~3 
nstruction operands L~3 
nteger and logical instructions 
L-19 

nteractive program debugging 
S-67, U-82 

nterface routines, supervisor 
1-61 

nterprocessor communications 
C-29 

nterprogram dialogue S-282 
nterrupt, from EXIO device 1-125 
nterrupt information byte (see 
IIB) 

nterrupt line S-313 
nterrupt servicing 1-46, 
NTIME timing instruction 

coding description L-181 
overview L-50, S-32 
ntroduction to EDL L-l 
nvoking the loader 1-23 
nvoking the session manager 
nvoking the utilities U-47 
OCB terminal I/O instruction 
coding description L-183 
constructing, for formatted 

screen ($IMDEFN) S-301 
overview L-44, S-47 
structure S-296 
terminal I/O instruction 

L-183 
TERMINAL statement converted 
to S-96 
IODEF sensor based I/O statement 
U-364 

coding description L-185 
overview L-39, S-51 
SPECPI - process interrupt 
user routine L-189 
IOLOADER, function of 1-127 
IOLOADER/IOLOADRU sensor based 

init. module desc. 1-78 
IOR data manipulation instruction 
coding description L-191 
overview L-19 



1-113 



U-27 
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IPL 

automatic application initial- 
ization and restart S-129 
messages U-421 

date and time U-425 
IPL operation U-421 
load utility location 

U-424 
sensor I/O status check 

U-424 
storage map generation 

U-423 
tape initialization U-423 
volume initialization 
U-422 
procedure U-421 
IPLSCRN, Multiple Terminal 
Manager C-125 
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job U-278 

job control sta 

JOB job identif 

command U-278 
job stream proc 

S-69, U-271 
job stream proc 

(session manag 
JP 

jump ($PDS) 

to address, 

subcommand 

JR jump referen 

subcommand U- 
JUMP, $J0BUTIL 
jump reference, 

subcommand U- 
jump to address 

subcommand U- 



tement U-278 
ier, $J0BUTIL 

essor, SJOBUTIL 

essor utilities 
er) S-216 

S-255 

$DIC0MP 
U-118 
ce, $DIC0MP 
118 
command U-279 

JR $DIC0MP 
118 

, JP $DIC0MP 
118 



V_y 



key (see program function (PF) 

keys 
keyboard and ATTNLIST tasks, tei — 

minal I/O L-47 
keyboard define utility for 4978, 

$TERMUT2 U-339 
KEYS list program function keys 

$IMAGE command U-253 
keyword operand L-5 



LA 

display directory, $DIUTIL 

command U-158 
list all members, $DISKUT1 

command U-135, U-136 
list terminal assignment, 

$TERMUT1 command U-336 
label L-3 

field L-3 

syntax description L-4 
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LABEL end jump, $JOBUTIL command 

U-280 
labels, tape (see tape) 
LABELS subroutine, $EDXASM 1-238 
LACTS list all members CTS mode, 

SDISKUT1 command U-135 
language control data set, 

$EDXASM 1-221, U-357 
LASTQ queue processing 
i nstructi on 

coding description L-191 
overview L-37, S-32 
layers, terminal I/O 1-108 
LB display characters 

$DIC0MP display character sub- 
command U-119 
$PDS S-252 
LC load control store, $TERMUT2 

command U-342 
LD 

list all hardware devices, 

$I0TEST command U-269 
list data members, $DISKUT1 
command U-138 
LDCTS list data members CTS mode, 

$DISKUT1 command U-135 
LE (less than or equal) L-34 
level status block (see LSB) 
LEW0RK1 work data set for $LINK 

U-400 
LEW0RK2 work data set for $LINK 

U-400 
LH display member header, $DIUTIL 

command U-159 
LI 

draw line $DIC0MP subcommand 

U-120 
draw line $PDS S-253 
load image store, $TERMUT2 
command U-342 
1 i brary 

definition S-52 

directory, disk or diskette 

1-87 
origin S-60 
1 i ne 

commands, $FSEDIT U-229 
continuation, source 

statement L-4 
editing, $EDIT1/N U-203 
pointer reposition (see move 

line pointer) 
source line continuation 
U-361 
LINK, Multiple Terminal Manager 
CALL 

coding description C-131, 

L-374 
internals M-9 
overview C-115, L-29 
link edit process, $LINK U-394 
autocall option U-393 
building an EDX supervisor 

U-394 
combining program modules 

U-392 
control records U-396 
elimination of duplication 

control sections U-393 
formatting modules for 

$UPDATE U-392 
input to $LINK U-396 
multiple control sections 

U-392 
object module record format 



U-407 
output from $LINK U-403 
storage map U-393 
link edit program object modules 

U-390 
link module, Indexed Access 

Method S-155 
linkage editor S-71, U-353 
LINKON, Multiple Terminal Manager 
CALL 

coding description C-132, 

L-376 
internals M-9 
overview C-115, L-29 
list 

active programs, $A operator 

command U-ll 
breakpoints and trace ranges, 

BP $DEBUG command U-92 
characters, LB SDICOMP 

subcommand U-119 
data members, LD $DISKUT1 

command U-138 
data members, LDCTS $DISKUT1 

command U-135 
data set 

BROWSE $FSEDIT option 

U-213 
LP $DISKUT2 command U-143 
LU $DISKUT2 command U-146 
status, ST $DIUTIL 
command U-162 
date/time, $W operator 

command U-25 
date/time, TD $DIC0MP 

subcommand U-124 
devices, LD $I0TEST command 

U-269 
end, EP SDICOMP subcommand 

U-117 
error specification, ERRORS 

$EDXASM command U-358 
hardware configuration, LD 

$I0TEST command U-264 
insert mask, MASK $FSEDIT line 

command U-232 
member, LM $DISKUT1 command 

U-138 
member, PR $DIC0MP command 

U-108 
member header, LH $DIUTIL com- 
mand U-159 
members? all 

LA $DISKUT1 command U-135 
LA $DIUTIL command U-158 
LACTS $DISKUT1 command 
U-135 
processor program, $EDXLIST 

U-370 
program function key codes, 

$PFMAP utility U-301 
program function keys, KEYS 

$IMAGE command U-253 
program members, LP $DISKUT1 

command U-139 
program members, LPCTS 

$DISKUT1 command U-135 
status of all tasks, WHERE 

$DEBUG command U-102 
storage, $D operator command 

U-15 
termi nal 
names/types/addresses, LA 
$TERMUT1 command U-335 
variables, VA $DIC0MP 
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SFSEDIT 
$DEBUG 

command 



subcommand U-125 
volume information, VI $I0TEST 
command U-270 
LIST commands 
data set 

LIST $EDIT1/N command 

U-193 
LIST $FSEDIT option U-217 
display lines of text, 
$EDIT1/N editor subcommand 
U-193 
display storage or registers, 

$DEBUG command U-95 
lines of text, LIST $EDIT1/N 

editor command U-176 
list device option, $EDXASM 

command U-358 
list device option, $EDXLIST 

command (J-370 
obtain full listing, LIST 

$EDXASM command U-358 
print data set, $EDIT1/N 

command U-176 
print data set, 

option U-217 
registers, LIST 

command U-95 
storage, LIST $DEBUG 
U-95 
listing control functions U-29 
listing control instructions 
EJECT L-109 
overview L-28 
PRINT L-216 
SPACE L-275 
TITLE L-308 
LISTP list to SSYSPRTR, 

command U-135 
LISTT list to terminal, 

command U-135 
LL list log data set, SDISKUT2 

command U-145 
LM list member, $DISKUT1 command 

U-138 
LO load indexed file, $IAMUT1 

command U-241 
LOAD 

Indexed Access Method CALL 

coding description L-344 
connect file S-159 
overview L-27, S-146 
return codes L-346 
task control instruction 

coding description L-194 
internals 1-24 
overview L-42 
return codes L-199 
used with automatic 

initialization S-129 
used with overlays S-40 
load mode S-149 
load point defined L-40 
load program 

$L operator command 1-23, 

U-17 
automatic initialization 

S-129 
EXEC SJOBUTIL command U-277 
loading overlays 1-22 
loading programs 1-19 
locate data sets and overlay 

programs, $PREFIND U-302 
LOCATE locate requested line 
number $FSEDIT primary comman 
U-223 



$DISKUT1 
$DISKUT1 



A-16 



S-271 



U-292 
S-324 



location dictionary 1-250 
lock 

locks, block and record 
locks, file A-17 
record S-146 
LOCK TERMCTRL function L-288 
LOG 

I/O error logging macro 
job processor commands, 
$J0BUTIL command U-281 
log data set for I/O errors 
logical end-of-f i le on disk 
logical screens S-293 
logon menu for session manager 

S-212, U-27 
long-lock-time condition S-180 
low storage 

during IPL 1-16 
during program load 1-20 
LP 

list data set on printer, 

$DISKUT2 command U-144 
list program members, $DISKUT1 
command U-139 
LPCTS list program members CTS 
mode, SDISKUT1 command U-135 
LR draw line relative 

$DIC0MP subcommand U-121 
$PDS S-257 
LS 

list space, $DISKUT1 command 

U-140 
list supervisor configuration, 
$I0TEST command U-270 
LSB level status block 1-52, 

U-427 
LT (less than) L-34 
LU list data set on console, 

$DISKUT2 command U-146 
LV list through volumes, $DISKUT1 
U-141 



M move line, 

U-233 
macro assembler 

internal overvi 

1-253 
overview S-9 
macro library S-6 
macro library/host 
magazine diskette ( 

diskette magazine 
magnetic tape (see 
MASK display insert 
line command U-23 
master control bloc 
Mathematical and Fu 
routine Library S 
MCB master control 
$PDS S-260 
definition A-2 
description A- 
MD move data base, 

command U-160 
member area S-250 
member control bloc 
MENU 

Multiple Termin 
CALL 

coding desc 



SFSEDIT line command 



ew $S1ASM 



S-5 
see 4966 
uni t) 
tape) 

mask, $FSEDIT 
2 

k (see MCB) 
nctional Sub- 
-6 
block 



28 

$DIUTIL 



k (MCB) S-260 
al Manager 
ription C-137, 
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L-377 
internals M-9 
overview C-116, L-29 
return to primary option, 
$FSEDIT U-223 
menu-driven U-2 
menus 

(see option selection menu) 
(see parameter selection 

menu) 
(see primary menu) 
(see primary option menu) 
(see secondary option menu) 
(see session manager, menus) 
(see transaction selection 
menu) 
MENUSCRN, Multiple Terminal Manag- 
er C-126 
MERGE merge data, $FSEDIT option 

U-217 
message, PRINTEXT instruction 

L-217 
message sending utility, $TERMUT3 

U-344 
messages U-421 
error U-427 

$DUMP U-431 
$L0G U-432 
$RMU U-433 
$TRAP U-435 
program check U-427 
system program check 
U-429 
IPL (see IPL messages) 
Multiple Terminal Manager 

C-178 
Remote Management Utility 
C-279 
minimum execution system config- 
uration S-22 
minimum program preparation 

requirements S-22 
mirror image 

description C-7, S-109 
in TERMINAL configuration 
statement S-101 
mixed precision combinations L-20 
MM move block, SFSEDIT line 

command U-233 
modified data S-307 
modify character image tables 

U-339 
modify character string, CHANGE 
$EDIT1/N editor subcommand 

U-184 
SFSEDIT primary command U-219 
modify default storage allocation, 

$DISKUT2 U-149 
modifying an existing data set, 

$FSEDIT U-215 
modifying TERMINAL statement for 

new I/O terminal 1-119 
module descriptions 
$S1ASM 1-269 
supervisor 1-75 
module names and entry points, 
supervi sor 

Version 1.1 S-347 
Version 2 S-357 
move 

block, MM SFSEDIT line com- 
mand U-233 
line pointer 

BOTTOM $EDIT1/N editor 
subcommand U-183 



DOWN $EDIT1/N editor 

subcommand U-189 
TOP $EDIT1/N editor 

subcommand U-200 
UP $EDIT1/N editor 
subcommand U-201 
tape U-324 
text 

$EDIT1/N editor subcom- 
mand U-195 
$FSEDIT line command 
U-233 
volumes on di sk or di skette, 
$M0VEV0L utility U-294 
MOVE data manipulation 
i nstructi on 

coding description L-201 
overview L-19 
MOVEA data manipulation 
i nstructi on 

coding description L-204 
overview L-19 
MOVEBYTE subroutine, $EDXASM 

1-236 
MP 

move beam, $DIC0MP subcommand 

U-121 
move position ($PDS) S-253 
MT move tape, $TAPEUT1 command 

U-324 
MTMSTORE file, Multiple Terminal 

Manager C-120, C-171, M-12 
MTMSTR, Multiple Terminal Manager 

C-169, C-170, M-12 
multiple field format L-155 
multiple program execution 1-36 
multiple program structure S-26 
multiple-task programs 1-33 
Multiple Terminal Manager 

accessing the terminal envi- 
ronment block C-139, M-22 
application program C-116 
application program languages 

L-30 
application program manager 

C-119, M-4 
automatic OPEN/CLOSE C-140, 

M-8 
CALL 

ACTION C-130, L-360 
BEEP C-137, L-361 
CDATA C-139, L-362 
CHGPAN C-135, L-364 
CYCLE C-132, L-365 
FAN C-139, L-366 
FILEIO C-141, L-367 
FTAB C-138, L-372 
LINK C-131, L-374 
LINKON C-132, L-376 
MENU C-137, L-377 
SETCUR C-137, L-378 
SETPAN C-134, L-379 
WRITE C-133, L-381 
coding instructions L-359 
components C-123, M-4 
considerations for 3101 

terminal C-122 
data files C-120 

MTMSTORE file C-120, 

C-171, M-12 
PRGRMS volume C-120, 

C-173 
SCRNS volume C-120, C-173 
TERMINAL volume C-120, 
C-171 
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direct file request types 

C-144, L-370 
disk file support C-140 
distribution and installation 

C-161 
dynamic screen modification 

and creation C-136 
file control area C-142 
file I/O considerations (Event 

Driven Executive) C-146 
file management C-118, M-8 
FILEIO, disk file support 

C-140 
FILEIO Indexed Access Method 

considerations C-148 
fixed screen formats C-125 
functions (callable routines) 

C-117, C-124 
indexed file request types 

C-144, L-369 
indexed file support C-140, 

L-367 
initialization programs 
C-119, C-158, M-4, M-6 
Input Buffer C-116, C-127 
Input Buffer Address C-116 
Input Buffer during 
4978/4979/3101 buffer oper- 
ation C-127 
interrupt information byte 

C-128 
messages C-178 
module list M-4 
operation C-115 
Output Buffer C-116 
Output Buffer Address C-127 
Output Buffer during 
4978/4979/3101 buffer oper- 
ation C-128 
overview L-29, S-10 
program management C-115* M-4 
program preparation 
COBOL C-166 
Event Driven Language 

C-164 
FORTRAN C-165 
PL/I C-167 
programming considerations 
COBOL C-153 
Event Driven Language 

C-151 
FORTRAN C-152 
PL/I C-155 
return codes (FILEIO) C-145, 

L-371 
screen definition C-121 
screen formats C-125 
IPLSCRN C-125 
MENUSCRN C-126 
SCRNSREP C-126 
SIGNONSC C-126 
screen panel manager M~7 
SIGNON/SIGNOFF C-156 

SIGNONFL C-174 
storage requirements C-168 
swap out data set C-116 
system generation 
considerations C-169 

data set requirements 

C-171, C-175 
volume requirements C-169 
terminal environment block 

(TEB) C-128, M-13 
TERMINAL file C-124, C-172 
terminal manager C-121 



terminal/screen management 

C-117 
terminal server C-119, M-7 
terminal support C-114, C-126 
transaction oriented 
applications C-121 
user application programs 

C-124 
utilities C-159 

DISCONNECT turn off 
specified terminals 
C-159 
programs report C-159 
RECONNECT turn on 
specified terminals 
C-159 
screens report C-160 
terminal activity report 
C-159 
work areas, control blocks and 
tables M-ll 

buffer areas M-15, M-29 
common area M-ll, M-25 
file table M-15, M-27 
MTMSTORE data set M-12 
program table M-14, M-21 
screen table M-14, M-21 
terminal environment block 

(TEB) M-13, M-22 
terminal table M-13, M-21 
MULTIPLY data manipulation 
i nstructi on 

coding description L-205 
overview L-19 
precision table L-206 
multi programmi ng 

automatic application initial- 
isation S-129 
design feature S-13 
multitasking 1-42 



(O 



vy 



NE (not equal) L-34 

newline subroutine, terminal I/O 

1-112 
NEXTQ queue processing 
i nstructi on 

coding description L-207 
overview L-37, S-32 
NOFLOAT floating-point command 

entries module description 1-79 
NOLIST no list option, SEDXASM 

command U-358 
NOMSG message suppression, 

$J0BUTIL command U-282 
non-compressed byte string S-309 
non-labeled tapes 

description S-241 
layout S-242 
processing S-243 
NOTE disk/tape I/O instruction 
coding description L-209 
overview L-22 
notify of an event (see POST) 
NQ reset prompt mode, $C0PYUT1 

command U-64 
nucleus initialization 1-15 
null character U-253 
NULL define null representation 
$IMAGE command U-253 
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null representation* defining 

U-253 
number representation conversion 

(see conversion) 



o 



E 



object data set for SEDXASM U-357 
object module record format* 

SLINK U-407 
object text elements* format of* 

$EDXASM 1-215 
OFF (set tape offline) 1-75 
OFF remove breakpoints and trace 

ranges, $DEBUG command U-97 
OLE operand list element* $EDXASM 
format of 1-216 
in instruction parsing 

($EDXASM) 1-220 
used in $IDEF 1-241 
online debug aids S-67 
op (operation field) L-3 
OPCHECK subroutine, $EDXASM 1-232 
opcode table, instruction parsing 

($EDXASM) 1-220, 1-223 
open a data set 

disk or diskette 1-90 
tape 1-99 
open EXIO device, EXOPEN 1-125 
open member ($PDS) S-261 
OPENIN Host Communications 

Facility, TP operand C-93 
OPENOUT Host Communications 
Facility, TP operand C-94 
operands 

defined L-3 
keyword L-5 

parameter naming (Px) L-8 
operating conventions* supervisor 

program 1-67 
operating environment S-22 
operation code* instruction 

parsing ($EDXASM) 1-220 
operation codes* Event Driven 

Language 1-68 
operations using index registers 

L-20 
operator commands S-63, U-9 
operator signals, terminal I/O 

L-49 
option selection menu U-33 
optional features support L-15 
OTE define object text element 

SEDXASM instruction 1-227 
OUTPUT $LINK control record U-399 
Output Buffer, Multiple Terminal 
Manager C-116, C-128 

contents during 4978/4979/3101 

buffer operation C-129 
definition M-29 
overflow L-20 
overlay function processor table 

1-167* 1-220 
overlay program S~40 

instructions, SEDXASM 1-259 
loading 1-22 
locating, $PREFIND U-302 
subroutines, SEDXASM 1-231 
user 1-38 
overlay program execution 1-38 
overlay selection, instruction 
parsing ($EDXASM) 1-223 



1-167, 1-220 

statements 
i nstructi ons 
module names 

L-19 



overlay table 
overvi ew 

data definition 

L-17 
data formatting 
L-18 

data format 
L-18 
data manipulation 
instructions L-19 

data representation 
mi xed-preci si on 

operations L-20 
operations using index 

regi sters L-20 
overflow L-20 
vector L-19 
disk I/O instructions L-22 
EXIO control instructions 

L-24 
floating-point arithmetic 

L-20 
floating-point arithmetic 
instructions L-20 

data representation L-21 
operations using index 

regi sters L-21 
return codes L-21 
graphics instructions L-26 
Indexed Access Method 

instructions L~27 
instructions and statements 

L-15 
integer and logical 
instructions L-19 
listing control statements 

L-28 
Multiple Terminal Manager 

instructions L-29 
program control statements 

L-32 
program module sectioning 

statements L-33 
program sequencing 

instructions L-34 
queue processing L~37 
sensoi — based I/O statements 

L-39 
single-precision L-19 
system configuration 

statements L-39 
tape I/O instructions L-40 
task control instructions 

L-42 
terminal I/O instructions 

L-44 
timing instructions L-50 



P/I (see process interrupt) 
PA patch, $DISKUT2 command U-147 
page eject S-63, U-16 
parameter equate tables L~ll 
parameter naming operands in the 

instruction format L-8 
parameter passing, Remote 

Management Utility C-212 
parameter selection menu U-33 
parameter tables, control block 

and L-ll 
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PARM program parameter passing, 

$JOBUTIL command U-283 
parsing, input data ($EDXASM) 

1-218 
partition assignment changing, $CP 

operator command U-14 
partitioned data sets S-247 
partitions S-42 
PASSTHRU function 

conducting a session C-227 
establishing a session C-225 
internals 1-166, 1-179 
overview C-225 
programming considerations 

C-237 
sample program C-265 
types of records C-232 
virtual terminals C-239 
Passthru record C-209 
patch 

disk/diskette, PA SDISKUT2 

command U-147 
Remote Management Utility 

defaults C-283 
storage, $P operator command 

S-63, U-18 
storage or registers, PATCH 
$DEBUG command U-98 
PATCH modify storage or registers, 

$DEBUG, command U-98 
PAUSE operator intervention, 

$J0BUTIL command U-284 
PC plot curve 

$DIC0MP subcommand U-119 
from plot curve data member 
($PDS) S-255 
PD pulse DO, $I0TEST command 

U-265 
PF,code TERMCTRL function L-288 
PF keys (see program function 

keys) 
phase execution and loading, 

$S1ASM 1-255 
PI process interrupt (see process 

interrupt) U-267 
PID program directory S-27 
PIXB (see primary-level index 

block) 
PL/I 

execution requirements S-24 
link editing S-71 
overview S-8 
program preparation 
requirements S-23 
supported by Multiple Terminal 
Manager C-200 
PL plot data, $DIC0MP subcommand 

U-122 
Plot control block (see PLOTCB) 
plot curve data member ($PDS) 

S-251 
PLOTCB graphics plot control 

block L-210 
PLOTGIN graphics instruction 
coding description L-210 
overview L-26 
POINT 

disk/tape instruction 

coding description L-212 
overview L-22, S-54 
point-to-point (BSC) S-65 
point-to-point vector drawing 

S-46 
POST 

post an event, $DEBUG command 



U-100 
task control instruction 

coding description L-213 
internals 1-58 
overview L-42, S-34 
supervisor function 1-46 
power outage, restoring after 

S-129 
PR print member, $DIC0MP command 

U-108 
precision L-19 

floating-point arithmetic 

L-21 
integer and logical L-19 
precision combinations, 
allowed L-20 
precision table 
ADD L-53 
ADDV L-54 
DIVIDE L-101 
MULTIPLY L-206 
overview L-20 
SUBTRACT L-284 
prefind U-302 
PREPARE IDCB command L-175 
PRGRMS volume, Multiple Terminal 

Manager C-120, C-173 
primary 

commands, $FSEDIT U-218 
option menu, $FSEDIT U-213 
option menu, session manager 

S-218, U-35 
task 

internals 1-29 
overview S-29 
volume S~60 
primary-level index block 
description S-195 
overview S-151 
PRINDATE terminal I/O instruction 
coding description L-215 
overview L-44, S-47 
timei — related instruction 
S-33 
PRINT listing control statement 
coding description L-216 
overview L-28 
print member, PR $DIC0MP command 

U-108 
PRINTEXT terminal I/O instruction 
coding description L-217 
overview L-44, S-47 
return codes L-219 
PRINTIME terminal I/O instruction 
coding description L-221 
overview L-44, L-50, S-47 
timer- related i n struct i on 
S-33 
PRINTNUM terminal I/O instruction 
coding description L-222 
overview L-44, S-47 
PRINTON define terminal name, 

$RJE2780/$RJE3780 C-75 
pri ori ty 

assigned to tasks S-29 
design feature S-13 
illustrated S-38 
internals 1-31 
task L-226, L-286 
PROC identify nested procedure, 

$J0BUTIL command U-286 
procedures, session manager (see 

session manager) 
PROCESS Indexed Access Method 
CALL 
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coding description L-347 
overview L-27, S-147 
return codes L-349 
process interrupt 

control block (SBIOCB) 1-128 
description S-48 
IODEF statement L-189 
I0TE5T command U-267 
supported by sensor I/O S-15 
user routine (SPECPI) L-189 
process mode 

definition S-150 
processing compiler output with 

$LINK or SUPDATE U-360 
processor status word (see PSW) 
PROGEQU L-13 
program 

equates 1-312 
assembly/compilation U-352 
control L-32 
disabling S-102 
entry (see $FSEDIT, $EDIT1/N) 
function (PF) keys L-47 
internals 1-108 
listing, KEYS $IMAGE 

command U-253 
listing 4978, $PFMAP 

utility U-301 
when using $F0NT edit 

mode U-206 
when using $FSEDIT U-211 
when using $IMAGE edit 

mode U-255 
when using session 
manager U-28 
header 1-30 
identifier, $J0BUTIL command 

U-287 
internal processing 1-30 
library update (see $UPDATE) 
load process, $PREFIND U-302 
loading (see also LOAD) 1-19 
module sectioning functions 

L-33 
organization S-29 
sequencing functions L-34 
structure S-29 
termination, EXIO 1-126 
types 1-32 
program check error messages 

U-427 
program execution via Remote Man- 
agement Utility 

EXEC function C-220 
PASSTHRU function C-225 
SHUTDOWN function C-251 
PROGRAM identifier, SJOBUTIL 

command U-287 
program preparation 

$EDXASM 1-211, U-356 

$S1ASM 1-253, U-372 

host assembler U-382 

of Remote Management Utility 

1-184 
summary S-18 
usage example S-367 
Program Preparation Facility 
description S-71 
overview S-5 
program preparation utilities 

U-351 
program preparation utilities 

(session manager) OU-36, S-214 
program/storage manager, Multiple 
Terminal Manager M~4 



program structure S-36 

internals 1-33 
program/task concepts 1-29, S-29 
PROGRAM task control instruction 

coding description L-225 

internals 1-30 

overview L-42, S-31 
PROGSTOP task control statement 

coding description L-234 

overview L-42, S-31 
prompting and advance input, 

terminal I/O L-46 
protected field S-307, U-253 
protocol, BSC transmission 1-156 
PSW processor status word U-430 
PU PUNCHO/PUNCHS function, 
$RJE2780/$RJE3780 reset type 
C-76 
pulse a digital output address, PD 

$I0TEST command U-264 
PUNCHO/PUNCHS define output file, 

$RJE2780/$RJE3780 C-75 
purpose of EDL L-l 
PUT Indexed Access Method CALL 

coding description L-350 

overview L-27 

return codes L-351 
PUTDE Indexed Access Method CALL 

coding description L-352 

overview L-27 

return codes L-353 
PUTEDIT data formatting 
i nstructi on 

coding description L-236 

overview L-18 

return codes L-238 
PUTSTORE TERMCTRL function L-288 
PUTUP Indexed Access Method CALL 

coding description L-354 

overview L-27 

return codes L-355 
Px L-8 



QCB task control statement S-33 

coding description L-240 

overview L-42 

queue control block 1-45, 
1-54 
QD queue descriptor I~64, L~37 
QE queue entry 

functions 1-64 

overview L-37 

processing S-32 
QUALIFY modify base address, 

$DEBUG command U-101 
QUESTION terminal I/O instruction 

coding description L-242 

overview L-44, S-47 
queuable resource S-33 
queue control block (see QCB) 
queue descriptor (see QD) 
queue entry (see QE) 
queue processing 1-64 
queue processing instructions 

L-37 
queue processing support module, 

QUEUEIO, description 1-81 
QUEUEIO queue processing support 
module description 1-81 
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RA reassign address, $TERMUT1 com- 
mand U-336v_^ 
random access S-53 
random work file operation/ 

$S1ASM 1-260 
RCB (see Remote Management 

Utility, control block) 
RDCURSOR terminal I/O instruction 
coding description L-244 
overview L-44, S-47 
RE 

copy from basic exchange data 

set, $C0PY command U-59 
rename, $TERMUT1 command 

U-337 
rename member, $DISKUT1 com- 
mand U-135, U-136 
rename member, $DIUTIL 

command U-161 
reset parameters, $IAMUT1 

command U-243 
restore 4974 to standard 
character set, $TERMUT2 
U-339 
read 

analog input, AI $I0TEST 

U-268 
character image table from 

4978, GET $F0NT U-206 
data set into work file 
$EDIT1 U-177 
$EDIT1N U-176 
$FSEDIT U-216 
digital input, DI $I0TEST 

command U-266 
digital input using external 

sync U-266 
Host Communications Facility, 

TP operand C-95 
IDCB command L-175 
operations (BSC) 1-157 
program, RP command 
$UPDATE U-410 
$UPDATEH U-419 
READ instruction 

disk/diskette return codes 

L-249, U-455 
disk/diskette/tape I/O 
i nstructi on 

coding description L-245 
overview L~22 
tape return codes L-249, 
U-456 
READDATA read data from host, 

SHCFUTl command C-108 
READID IDCB command L-175 
READOBJ read object module, 

SHCFUT1 command C-109 
READTEXT terminal I/O instruction 
coding description L-251 
overview L-44, S-48 
return codes L-255 
return codes, virtual terminal 
communications L-256 
ready a task supervisor execution 

state 1-43 
READ1 IDCB command L-175 
READ80 read 80 byte records, 

$HCFUT1 command C-109 
real image ACCA terminals C-7 



realtime data member 
$PDS S-251 

RT $DIC0MP subcommand U-124 
RECEIVE function 

overview C-243 
sample program C-262 
RECONNECT Multiple Terminal 

Manager utility C-120, C-159 
record 

blocking, Remote Management 

Utility C-211 
definition S-53 
exchange, Remote Management 

Utility C-208 
format for object module, 

$LINK U-407 
header, Remote Management 

Utility C-209 
sizes, Host Communications 
Facility C-83 
reformat diskettes U-68 
register, index L-6 
register, software L-6 
register conventions 
$S1ASM 1-257 
BSCAM processing 1-147 
common emulator setup routine 

1-68 
EBCDIC to floating-point 

conversion 1-205 
summary chart $S1ASM 1-258 
terminal I/O support 1-106 
REL release a status record, 

$HCFUT1 command C-110 
relational statements L-180 
RELEASE 

Host Communications Facility, 

TP operand C-96 
Indexed Access Method CALL 
S-147 

coding description L-356 
overview L-27, S-147 
return codes L-357 
release a status record, REL 

$HCFUT1 command C-110 
release space ($PDS) S-261 
relocating program loader 1-19 
relocation dictionary, $EDXASM 

1-250 
REMARK operator comment, SJOBUTIL 

command U-288 
remote job entry to host, 
$RJE2780/$RJE3780 C-73 
Remote Management Utility 
CDRRM equates C-292 
control block (RCB) 

description 1-164, 1-169 
equate tables C-292, 

1-295 
use in problem determi- 
nation 1-190 
defaults C-283 
error handling C-277 
function table 1-164, 1-167 
functions C-206, 1-166 
installation C-281 
interface C-207 
internals 1-216 
logic flow 1-170 
messages C-279 
modifying defaults C-283 
module descriptions 1-191 
module list 1-186 
operation C-213 
overlay function processor 
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table 1-167, 1-220 
overlay table 1-167, 1-220 
overview C-205 
program preparation 1-184 
requirements C-207 
sample host programs C-259 
system generation 

considerations C-281 
TERMINAL statement example 

S-107 
terminating C-251 
remote system (see Remote 

Management Utility) C-205 
remove breakpoints and trace 

ranges, OFF $DEBUG command U-97 
rename member 

RE $DISKUT1 command U-135, 

U-136 
RE $DIUTIL command U-161 
RENUM renumber lines 

$EDIT1/N subcommand U-196 
$FSEDIT primary command U-224 
reorganize an indexed data set 
U-242 

procedure S-166 
report data member ($PDS) S-251 
reposition line pointer (see move 

line pointer) 
Request record C-209 
reserved labels L-4 
reset 

function, $RJE2780/$RJE3780 

attention request C-76 
IDCB command L-176 
Indexed Access Method 

ECHO mode, EC $IAMUT1 com- 
mand U-240 
SE command parameters, RE 
$IAMUT1 command U-243 
line command, SFSEDIT primary 
command U-225 
RESET task control instruction 
coding description L-258 
overview L-42, S-31 
resident assembler routines 1-256 
resolution, enhanced 1-201 
resolution, standard graphics 

1-201 
resource control, supervisor 1-54 
restart, automatic S-129 
restore 

disk or disk volume from tape, 

RT $TAPEUT1 command U-326 
dump volume utility, $M0VEV0L 

U-294 
4974 to standard character 
set, RE $TERMUT2 command 
U-343 
resulting field (EOR) L-122 
return codes (see also completion 
codes) 

$DISKUT3 S-319, U-444 

$PDS U-445 

BSC C-57, U-446 

CONVTB L-80 

CONVTD L-83 

data formatting instructions 

U-447 
DELETE L-330 
DISCONN L-333 
ENDSEQ L-335 
EXIO U-448 

EXIO instruction L-131 
EXIO interrupt L-132 
EXTRACT L-337 



FADD L-136 

FDIVD L-138 

FILEIO C-145 

floating point instruction 

U-450 
FMULT L-145 

formatted screen image U-450 
FSUB L-160 
FTAB C-138, L-373 
GET L-340 
GETSEQ L-343 
in Remote Management Utility 

control block 1-190 
Indexed Access Method U-451 
LOAD L-199, U-452 
LOAD (Indexed Access Method) 

L-346 
Multiple Terminal Manager 

U-453 
PRINTEXT L-219 
PROCESS L-349 
PUT L-351 
PUTDE L-353 
PUTEDIT L-238 
PUTUP L-355 
READ disk/diskette L-249, 

U-455 
READ tape L-250, U-456 
READTEXT L-255 
RELEASE L-357 
SBIO U-457 

SBIO instruction L-262 
SETPAN C-135 
tape L-77 
TERMCTRL L-288 
terminal I/O L-255, U-458 
ACCA U-459 
interprocessor 
communications C-31, 
U-460 
virtual terminal L-256, 
U-461 
TP (Host Communications Facil- 
ity) C-102, U-463 
WHERES L-316 
WRITE disk/diskette L-320, 

U-455 
WRITE tape L-320, U-456 
return from immediate action 

routine (SUPEXIT) 1-49 
return from task level (SUPRTURN) 

1-49 
RETURN program control 
i nstructi on 

coding description L-259 
overview L-32, S~31 
supervisor entry point 1-279, 

1-313 
supervisor interface 1-62 
REW (rewind tape) L-75 
rewind tape, MT $TAPEUT1 command 

U-324 
RH reassign hardcopy, STERMUT1 

command U-338 
RI read 
t ran spa r en t/non- transparent, 
$BSCUT2 command C-68 
RJE (see Remote Job Entry) 
RLOADER 1-19, 1-22 

RLOADER/RLOADRU module 
description 1-78 
RO reorganize indexed file, 

$IAMUT1 command U-242 
ROFF (rewind offline) L-75 
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roll screen* terminal I/O L~48, 

S-293 
RP read program 

$UPDATE command U-410 
$UPDATEH command U-419 
RPQ D02038, 4978 display station 
attachment C-6, S-97 
different device 
configurations C-8 
RSTATUS IDCB command L-175 
RT 

activate realtime data member, 

$DIC0MP subcommand U-124 
change realtime data member 

name ($PDS) S-258 
disk or disk volume from tape, 
$TAPEUT1 utility U-326 
RWI read/write non-transparent, 

$BSCUT2 command C-58 
RWIV read/write non-transparent 

conversational, $BSCUT2 C-71 
RWIVX read/write transparent 

conversational, $BSCUT2 C-70 
RWIX read/write transparent, 

$BSCUT2 command C-67 
RWIXMP read/write multidrop 
transparent, $BSCUT2 command 
C-60 



SA save data, SDICOMP subcommand 

U-124 
SAVE 

data set on disk, $IMAGE com- 
mand U-254 
work data set, $EDIT1/N 
subcommand U-197 
save current task status 

(TASKSAVE) 1-54 
save data, SA $DIC0MP subcommand 

U-124 
save disk or disk volume on tape, 

STAPEUT1 utility U-330 
save storage and registers, STRAP 

utility U-348 
SB special PI bit, $I0TEST 

command U-267 
SBAI sensor based I/O support 

module description 1-80 
SBAO sensor based I/O support 

module description 1-80 
SBCOM sensor based I/O support 

module description 1-80 
SBDIDO sensor based I/O support 

module description 1-80 
SBIO sensor based I/O instruction 
coding description L-260 
control block (SBIOCB) 1-127 
overview L-39, S-51 
return codes L-262 
SBIOCB sensor based I/O control 

block 1-127 
SBPI sensor based I/O support 

module description 1-80 
SC save control store, $TERMUT2 

command U-343 
screen format builder utility, 

$IMAGE S-68, U-250 
SCREEN graphics instruction 
coding description L-270 
overview L-26 



screen image format building 

U-250 
screen images, retrieving and dis- 
playing S-300 
screen management, terminal I/O 

L-48 
SCRNS volume, Multiple Terminal 

Manager C-120, C-173 
SCRNSREP, Multiple Terminal 

Manager C-125 
scrolling, $FSEDIT U-210 
SCSS IDCB command L-176 
SE set parameters, $IAMUT1 

command U-244 
SE set status, $HCFUT1 command 

C-110 
second-level index block 
description S-197 
overvi ew S-153 
secondary 

disk volumes S-132 
volumes S-60 
secondary option menus S-218, 
U-36 

(see session manager) 
sectioning of program modules 

L-33 
sector S-52 

self-defining terms L-4 
send 

data, HX $DIC0MP subcommand 

U-118 
data set, SEND function C-247 
message to another terminal, 
STERMUT3 utility U-344 
SEND function 

internals 1-166, 1-172 
overview C-247 
sample program C-274 
sensor based I/O 

assignment L-188 

I/O control block (SBIOCB) 

1-127 
modules (IOLOADER/IOLOADRU) 

1-78 
statement overview L-39 
support module descriptions 

1-81 
symbolic L-9 
SENSORIO configuration statement 

S-51, S-84 
sequence chaining L-27 
sequencing instructions, program 

L-34 
sequential access 

in Indexed Access Method 

S-145 
overview S-53 
sequential work file operations 

($S1ASM) 1-259 
serially reusable resource (SRR) 

1-59, S-33 
session, PASSTHRU 

conducting C-227 
establishing C-225 
logic flow diagram C-230 
using $DEBUG utility C-272 
session manager U-27 

SSMALLOC data set allocation 

control data set S-222, U-30 
$SMDELET data set deletion 

control data set S-222, U-32 
adding an option S-209, S-224 
communications utilities U-42 
communications utilities 
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S-217 
data management S-215 
diagnostic utilities 

S-217 
disk utilities (see data 

management) 
execute program utilities 

S-216 
graphics utilities S-216 
job stream processor 

utilities S-216 
logon menu U-27 
primary S-218, U-35 
program preparation 

utilities S-214 
secondary S-218, U-36 
summary of S-213 
terminal utilities S-215 
updating primary option 
S-224 
creating a new menu S-224 
data management U-38 
data set deletion U-32 
data sets creation U-29 
diagnostic utilities U-43 
execute program utilities 

U-41 
graphics utilities U-40 
invoking U-27 
invoking a $J0BUTIL procedure 

S-229 
job stream processor 

utilities U-42 
menus U-33 
minimum partition size 

required U-27 
operational overview S-209 
primary option menu, $SMMPRIM 

S-218, U-35 
procedures 

communications utilities 

S-217 
data management utilities 

S-215 
diagnostic utilities 

S-217 
execute program utilities 

S-216 
graphics utilities S-216 
job stream processor 

utilities S-216 
overview S-220 
program preparation 

utilities S-214 
terminal utilities S-215 
updating S-225 
program function keys U-28 
program preparation utilities 

U-36 
secondary option menus S-218, 

U-36 
storage usage S-211 
terminal utilities U-40 
text editing utilities U-36 
utilities not supported U-46 
SET, ATTN TERMCTRL function L-288 
set breakpoints and trace ranges, 

AT $DEBUG command U-90 
set date and time, $T operator 

command S-63, U-19 
SET Host Communications Facility 

TP operand C-97 
SET,LPI TERMCTRL function L-288 
set status, SE $HCFUT1 command 
C-110 



set tape offline, MT $TAPEUT1 com- 
mand U-324 
set time, $T operator command 

U-19 
SETBUSY supervisor busy routine 

1-48, 1-63 
SETCUR, Multiple Terminal Manager 
CALL 

coding description C-137, 

L-378 
internals M~9 
overview C-117, L-29 
SETEOD subroutine S-324 
SETPAN, Multiple Terminal Manager 
CALL 

coding description C-134, 

L-379 
internals M-9 
overview C-117, L-29 
return codes L-380 
setup procedure for SJOBUTIL 

U-271 
SG special PI group, $I0TEST com- 
mand U-267 
SHIFTL data manipulation 
i nstruct i on 

coding description L-271 
overview L-19 
SHIFTR data manipulation 
i nstructi on 

coding description L-273 
overview L-19 
SHUTDOWN function C-251, 1-166, 

1-181 
SI save image store, $TERMUT2 com- 
mand U-341 
SIGNON/SIGNOFF, Multiple Terminal 
Manager C-156 

SIGNONFL C-174 
single program execution 1-35 
single-task program 1-33 
single task program S-34 
SIXB (see second-level index 

block) 
SLE sublist element, $EDXASM 
format of 1-217 
in instruction parsing 

($EDXASM) 1-220 
instruction description and 

format 1-229 
used in $IDEF 1-241 
software regi ster L~6 
software trace table S-265 
sort/merge S-9 

source program compiling S-71 
source program entry and editing 

S-66, U-351 
source program line continuation 

using SEDXASM L-4, U-361 
source statements, $EDXASM overlay 

generated 1-243 
SP spool function, 
$RJE2780/$RJE3780 reset type 
C-76 
SPACE listing control statement 
coding description L-275 
overview L-28 
special control characters S-46 
special PI 

bit, SB $I0TEST command U-267 
group, SG $I0TEST command 
U-267 
specifications, data conversion 
L-146 
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SPECPI define special process 

interrupt L-189 
SPECPIRT instruction 

coding description L-276 
overview L-39 
split screen configuration S-293 
SPOOL define spool file, 
$RJE2780/$RJE3780 C-76 
SQ set prompt made, $C0PYUT1 

command U-64 
SQRT data manipulation 
instructi on 

coding description L-277 
overview L-19 
SS set program storage parameter, 

$DISKUT2 command U-149 
ST 

display data set status, 
$DIUTIL command U-162 
save disk or disk volume on 
tape, $TAPEUT1 command U-330 
standard labels, tape 
E0F1 S-240 
E0V1 S-239 
fields S-238 
HDR1 S-239 
header label S-235 
layouts S-236 
processing S-236 
trailer label S-235 
volume label S-235 
V0L1 S-238 
START 

IDCB command L-176 
PROGRAM statement operand 
L-225 
start and termination procedure, 

$DEBUG U-85 
STARTPGM 1-16 
statement label L-4 
static screen, terminal I/O 
accessing example S-297 
overview L-48 
status, set, SE $HCFUT1 command 

C-110 
STATUS data definition statement 
coding description L-278 
overview L-17 
status data set, system Host 

Communications Facility C-85 
Status record C-258 
STIMER timing instruction 

coding description L-280 
overview L-50, S-32 
with PASSTHRU function C-238 
storage estimating 

application program size 

S-344 
supervisor size S-333 
utility program size S-342 
storage management 

address relocation translator 

1-71, S-42 
allocating 1-25 
description S-42 
design feature S-13 
storage map, resident loader 1-26 
storage map ($S1ASM) phase to 

phase 1-262 
storage resident loader, RLOADER 

1-19 
storage usage during program load 

1-20 
store next record ($PDS) S-261 
store record ($PDS) S-261 



strings, relational statement 

L-180 
SU 

submit (X) function, 

$RJE2780/$RJE3780 reset type 

C-77 
submit job to host, $HCFUT1 

command C-lll 
SUBMIT 

Host Communications Facility, 

TP operand C-98 
send data stream to host, 

$RJE2780/$RJE3780 C-77 
submit job to host, $EDIT1 

command U-179 
submit job to host, $FSEDIT 

option U-217 
SUBMITX send transparent, 

$RJE2780/$RJE3780 C-77 
SUBROUT program control statement 
coding description L-281 
overview L-32, S-31 
subrouti nes 

$IMDATA S-303 
$IMDEFN S-301 
$IM0PEN S-300 
$IMPR0T S-302 
ALTIAM concatenation S-167 
DSOPEN S-322 
overview S-31 
SETEOD S-324 
SUBTRACT data manipulation 
i nstructi on 

coding description L-283 
overview L-19 
precision table L-284 
suggested utility usage U-48 
supervi sor/emulator 

class interrupt vector table 

1-10, 1-277 
communications vector table 

1-11, 1-278, 1-313 
control block pointers 1-11 
design features S-13 
device vector table 1-11, 

1-278 
emulator command table 1-13, 

1-282, 1-301 
entry routines 1-47 
equate table 1-279, 1-313 
exit routines 1-49 
features S-13 
fixed storage area 1-9 
functions 1-44 

calling 1-60 
generation 1-5, S-115 
initialization control module, 

EDXINIT, description 1-81 
initialization task module, 

EDXSTART, description 1-81 
interface routines 1-61 
introduction 1-5 
module names and entry points 

S-309 
module summary 1-8 
overview S-29 

PASSTHRU session with C-225 
referencing storage locations 

in 1-12 
service routines 1-53 
size, estimating S-333 
task supervisor work area 

1-13, 1-280 
utility functions (see 

operator commands) 
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with the address translator 
support 1-72 
SUPEXIT supervisor exit routine 

1-49, 1-63 
support for optional features 

L-15 
SUPRTURN supervisor exit routine 

1-49 
surface analysis of tape, STAPEUTl 

utility U-319 
SVC supervisor entry routine 

1-47, 1-62 
SVCABEND supervisor exit routine 

1-49 
SVCBUF supervisor request buffer 

1-48 
SVCI supervisor entry routine 

1-48 
symbol dictionary, $EDXASM 1-250 
symbol table types, $EDXASM 1-216 
symbolic L-10 

address (disk, tape) L-10 
disk/tape I/O assignments 

L-10 
diskette L-10 

reference to terminals S-110 
sensor I/O addresses L-9 
terminal I/O L-10 
symbols (EXTRN) L-134 
symbols (WXTRN) L-323 
syntactical coding rules L-4 
syntax checking in instruction 

parsing (SEDXASM) 1-221 
syntax rules L-4 
SYSGEN (see system generation) 
system 

alternate logging device 

S-46, S-lll 
class interrupt vector table 

1-10, 1-277 
commands (see operator 

commands) 
common area 1-12 
communications vector table 

1-11, 1-278, 1-313 
control blocks, referencing 

1-289 
data tables, EDXSYS, module 

description 1-75 
device vector table 1-11, 

1-278 
emulator command table 1-13, 

1-282, 1-301 
generati on 

procedure S-115 
host/remote C-205 
logging device S-46, S-110 
operational and error 

messages U-421 
printer S-46, S-110 
program check and error 

messages U-427 
task supervisor work area 
1-13, 1-280 
SYSTEM configuration statement 

L-39, S-86 
system configuration statements 

S-75 
system control blocks S-42 
system reserved labels L-4 



U2 



TA allocate tape data set, 

$TAPEUT1 command U-333 
tables, parameter equate L-ll 
tabs 

HTAB $IMAGE command U-252 
TABSET $EDIT1/N subcommand 

U-198 
VTAB $IMAGE command U-254 
TABSET establish tab values 

$EDIT1/N editor subcommand U-198 
tape 

bypass label processing S-244 
control L-74 
data set L-40 
defining volumes S-62 
definitions for data sets 

L-40 
end-of-tape (EOT) L-41 
I/O instructions L-40 
internals 1-97 
labels 

external S-233 
internal S-233 
load point (BOT) L-40 
non-label 

layout S-242 
processing S-243 
support S-241 
record L-40 

return codes L-77, U-455 
standard label 

fields S-238 
layout S-236 
processing S-236 
support S-235 
storage capacity S-59 
symbolic addressing L-10 
utility, $TAPEUT1 S-233, 

U-311 
volume L-40 
TAPE configuration statement S-94 
tape data set control block 1-99 
tape device data block (see TDB) 
TAPEINIT, tape initialization mod- 
ule description 1-82 
tapemark L-74 
task 

active/ready level table 1-50 

concepts 1-29 

control 1-42 

control block (see TCB) 

definition and control func- 

t i ons 
dispatching 1-52 
error exit facility 

check and trap handling 

S-268 
linkage conventions S-269 
execution states 1-43, S-39 
internals 1-42 
multiple-task program 1-33, 

S-34 
overview L-42, S-29 
priority (see priority, task 

execut i on) 
single-task program 1-33, 

S-34 
states S-39 
status display, WHERE $DEBUG 

command U-102 
structure S-29 
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supervisor 1-42 

supervisor address translator 

support module 1-76 
supervisor functions 1-44 
supervisor work area 1-13, 

1-280 
switching 1-51, S-30 
synchronization and control 
1-54, S-30 
task code words L-8 
TASK task control statement 
coding description L-285 
overview L-42, S-31 
TASKSAVE supervisor service 

routine 1-54 
TCB task control block 1-32, 

1-43, 1-49, 1-56, 1-314 
TCBEQU L-13 
TD 

display line and data ($PDS) 

S-258 
display time and date, $DIC0MP 

subcommand U-124 
test display, $DIC0MP command 
U-108 
TDB, tape device data block 
description 1-97 
equate listing 1-316 
TEB terminal environment block 

C-128, M-13 
Tektronix C-6 

devices supported S-14, S-45 
support for digital I/O S-312 
teleprocessing (see TP) 
teletypewriter adapter C-7, C-21 
TERMCTRL terminal I/O instruction 
coding description 1-288 
overview L-44 
return codes L-301 
TERMERR L-44 
termi nal 

#7850 teletypewriter adapter 

C-21 
ACCA support C-7, L-295 
ASCII C-7 
assignment list, LA $TERMUT1 

command U-336 
attention handling L-47 
attention keys L-47 
code types C-303 
configuration utility, 

$TERMUT1 U-334 
connected via digital I/O 

S-312 
control block (see CCB) 
data representation L-46 
definition and control 

functions S-47 
device configurations C-8 
EDXTIO/EDXTIOU module 

description 1-78 
environment block (see TEB) 
error handling L-44 
forms control L-46 
forms interpretation for 

display screens L-46 
functi ons 

data formatting C-16 
definition C-16 
interrupt processing C-17 
hardware jumpers C-18 
I/O L-46 

attention handling L-47 
data representation L-45 
error handling L-44 



forms control L-45 
prompting and advance 

input L-46 
screen management L-48 
I/O internal design 1-105 
I/O support layer 3 1-112 
input L-46 
keyboard and ATTNLIST tasks 

L-47 
message sending utility, 

$TERMUT3 U-344 
new I/O terminal support 

1-117 
operations C-14 
operator signals L-49 
output L-46 

output line buffering L-46 
program function keys L-47 
prompting and advance input 

L-46 
return codes C-20, L-219, 

L-255, U-458 
roll screens L-48 
sample terminal support 

program C-26 
screen management L-48 
server, Multiple Terminal 

Manager C-119, M-7 
session manager (see session 

manager) 
special considerations for 

attachments of devices 

via #1610 or #2091 with 

#2092 adapters C-17 
via #2095 with #2096 
adapters C-21 
special control characters 

S-46 
static screens L-48 
supported devices and 

features C-6 
terminal I/O L-47 
terminology for supported 

terminals C-7 
transmission protocol C-31 
utilities (session manager) 

S-215, U-40 
virtual I/O 1-115 
TERMINAL configuration statement 
defaults S-105 
definition S-96 
overview S-48 
TERMINAL volume, Multiple Terminal 

Manager C-120, C-171 
termi nate 

logging, $L0G utility U-292 
Remote Management Utility 

C-251 
test 

BSC lines, $BSCUT2 utility 

C-64 
generated report or graphics 

profile member U-108 
label types, $TAPEUT1 utility 

U-319 
process interrupt for 

occurrence of event, $I0TEST 

U-267 
TEXT data definition statement 
coding description L-305 
overview L-17 
text editing utilities 

edit dataset subroutine exam- 
ples 1-326 
full screen-editor $FSEDIT 
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U-209 
line editors, SEDIT1/N U-169 
overview S-66 
work data set, format of 
1-321 
text wrapping, WRAP function 

C-254 
time/date 

display, $W operator command 

U-25 
set, $T operator command U-19 
set, automatic initialization 
facility S-130 
time of day 

GETTIME instruction L-167 
TIMEDATE Host Communications 
Facility, TP operand C-100 
TIMER configuration statement 

S-33, S-112 
timer control L-50 
timer module descriptions 

(EDXTIMER, EDXTIMR2) 1-80 
timing instructions L-50, S-32 
TITLE listing control statement 
coding description L-308 
overview L-28 
TONE TERMCTRL function L-288 
TOP repostiton line pointer, 

$EDIT1/N editor subcommand U-200 
TP host communication instruction 
descri pti on 

coding description C-90 
internals 1-153 
subcommand operations 1-157 
TPCOM host communications support 

module description 1-81 
trace printing routine for BSC, 

$BSCUT1 C-62, S-65 
trace ranges and breakpoints 

setting, AT $DEBUG command U-90 
trace routine for BSC, $BSCTRCE 

C-61 
trace table, software S-265 
transaction program, Multiple 
Terminal Manager 
functions L-28 
Multiple Terminal Manager 
C-121 
transfer data set to host 
SEND function C-247 
WR $HCFUT1 command C-112 
WRITE $EDIT1 command U-180 
WRITE SFSEDIT option U-216 
transfer rates for data, Host 

Communications Facility C-84 
transient program loader 1-19 
transmission codes S-98 
transmission protocol, host 

communications 1-156 
transmitted data, length of, host 

communications 1-159 
TRAPDUMP force trap dump, $TRAP 

attention command U-349 
TRAPEND end $TRAP use, $TRAP 

attention command U-349 
TRAPOFF deactivate error trap, 

STRAP attention command U-349 
TRAPON activate error trap, $TRAP 
attention command U-349 
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L-288 
tape 

L-288 
U-253 



UN unload indexed file, $IAMUT1 

command U-246 
UNBLINK TERMCTRL function 
undefined length records, 

S-245 
UNLOCK TERMCTRL function 
unprotected field S-307, 
UP move line pointer, $EDIT1/N 

editor subcommand U-201 
update utility 

SUPDATE convert object program 

to disk U-408 
$UPDATEH convert host object 
program to di sk U-418 
updating a menu for the session 

manager S-224 
user defined data member ($PDS) 

S-252 
user exit routine L-310 

requires Macro Assembler S-71 
r initialization modules 1-17 
R program control instruction 
coding description L-310 
overview L-32 
utUities U-47 

BSC communications 
invoking U-2 

type S-64, 
S-5 

supported by session 
U-46 

S-342 



us 
US 



li sted by 
overvi ew 
utilities not 
manager menu 
utility program size 
utility usage U-48 
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V verify, $INITDSK command U-260 
VA 

display, variable, SDICOMP 

subcommand U-125 
display variable ($PDS) S-254 
variable length record, Host 

Communications Facility C-84 
variable length records, tape 

S-244 
variable names L-4 
vary disk, diskette, or tape 

offline, $VARY0FF U-20 
vary disk, diskette, or tape 

online, $VARY0N U-22 
vector 

addition L-19, L-54 
data manipulation L-19 
vector addition (ADDV) 

coding description L-54 
overview L-19 
verify 

disk or diskette data set, V 

SINITDSK U-260 
tape executing correctly, EX 

$TAPEUT1 command U-319 
tape surface free of defects, 
EX §TAPEUT1 command U-319 
verify and initialize disk or 

diskette library, $1NITDSK U-256 
verify identification 
host system C-223 
remote system C-223 
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VERIFY verify changes, $EDIT1/N 

editor subcommand U-202 
vertical tabs, defining U-254 
VI list volume information, 

$I0TEST command U-270 
virtual terminal communications 
accessing the virtual termi- 
nal S-281 
creating a virtual channel 

S-280 
establishing the connection 

S-280 
intei — program dialogue S-282 
internals 1-115 
loading from a virtual 

terminal S-281 
Remote Management Utility 
requirements C-281 
volume 

definitions (disk/diskette) 

L-22, S-52 
dump restore utility, 

$M0VEV0L U-294 
labels S-60 
VTAB define vertical tab setting, 
$IMAGE command U-254 



CALL 

coding descript 

L-381 
internals M-9 
overview C-118 
save work data set 
$EDIT1 command 
$EDIT1N command 
$FSEDIT primary 
U-216 
tape I/O instructio 
coding descript 
overview L-22 
return codes L 
write data set to host, 

command C-112 
write operations, HCF 
WRITE1 IDCB command L- 
WS put program in wait 

$I0TEST command U-264 
WTM (write tape mark) 
WXTRN program module se 
statement 

coding description 
overview L-33 
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, L-29 






U-180 

U-181 
opti on 



ion L-317 

-320, U-456 
WR $HCFUT1 

1-156 

175 

state, 

L-75 
cti oni ng 

L-323 
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WAIT program sequencing statement 
coding description L-313 
overview L-42, S-31 
supervisor function 1-45, 
1-58 
wait state, put program in, WS 

$I0TEST command U-264 
waiting, task execution state 

1-43 
WE copy to basic exchange diskette 

data set, $C0PY command U-63 
WHERE display status of all tasks, 

$DEBUG command U-102 
WHERES task control function 
coding description L-315 
overview L-42, S-287 
return codes L-316 
WI write non-transparent, $BSCUT2 

command C-69 
WIX write transparent, $BSCUT2 

command C-69 
word boundary requirement 
DO L-34 
IF L-34 
PROGRAM L-225 
work data set 

$EDXASM 1-249 
$LINK U-400 
$S1ASM 1-258 
work files, $S1ASM, how used 

1-258 
WR write a data set to host, 

$HCFUT1 command C-112 
WRAP function C-254, 1-166, 1-176 
WRITE 

disk/diskette I/O instruction 
coding description L-317 
overview L-22 
return codes L-320, U-455 
Host Communications Facility, 

TP operand C-101 
IDCB command L-175 
Multiple Terminal Manager 



X-type format L-154 

XI external sync DI, $I0TEST 

command U-266 
XO external sync DO, SIOTEST 

command U-266 
XYPLOT graphics instruction 

coding description L-324 

overview L-26 
YTPLOT graphics instruction 

coding descrition L-325 

overview L-26 
ZCOR, sensor I/O L-189 
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C-7 
2092 asynchronous communicat 
four line adapter C-6 

considerations for attac 

of devices C-17 
different device 

configurations C-8 
to attach ACCA terminal 
use with different termi 

C-7 

2095 feature programmable ei 
line controller C-6 

considerations for attac 

of devices C-21 
different device 

configurations C-8 
use with different termi 

C-7 

2096 feature programmable fo 
line adapter C-6 

considerations for attac 

of devices C~21 
different device 

configurations C-8 
use with different termi 

C-7 
2741 Communications Terminal 
supported S-45 
TERMINAL statement examp 

S-106 
3101 Display Terminal 

attribute character C-l 
block mode consideration 

C-25 
character mode considera 

C-22 
interface with Multiple 

Terminal Manager C-121 
TERMINAL configuration 

statement examples S-l 
3585 4979 display station 
attachment C-6, 

4952 Processor 
partitions on 
timer feature 

S-32 

4953 Processor 
partitions on 
timer feature 

S-32 
4955 Processor 

partitions on 
timer feature 

S-32 

4962 Disk Storage Unit 
storage capacity S-58 
supported by Indexed Ace 

Method S-146 

4963 Disk Subsystem 
storage capacity S-58 
supported by Indexed Ace 

Method S-146 

4964 Diskette Storage Unit 
part of minimum system c 

uration S-22 
required for program 

preparation S-22 
supported by Indexed Ace 

Method S-146 
4966 Diskette Magazine Unit 
part of minimum system c 

uration S-22 
required for program 

preparation S-22 
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S-42 
installed 
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i nstalled 
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4969 Magnetic Tape Subsystem 
hment S-233 

4973 Line Printer 

defined in TERMINAL configura- 
tion statement S-96 
S-99 end of forms S-307 
nals TERMINAL statement example 

S-105 
ght 4974 Matrix Printer 

defined in TERMINAL configura- 
hment tion statement S-96 

end of forms S-307 
restore to standard character 
set, RE $TERMUT2 U-339 
nals TERMINAL statement example 

S-105 
ur 4978 Display Station 

defined in TERMINAL configura- 
hment tion statement S-96 

part of minimum system 

configuration S-22 
reading modified data S-307 
nals required for program 

preparation S-22 
TERMINAL statement example 
S-105 
le 4979 Display Station 

defined in TERMINAL configura- 
tion statement S-96 
22 part of minimum system 

s configuration S-22 

required for program 
tions preparation S-23 

TERMINAL statement example 
S-105 
, L-29 4982 sensor I/O unit S-84 

5230 Data Collection Interactive 
08 S-ll 

5620 4974 matrix printer 
attachment C-6 

defined in TERMINAL statement 
S-97 
on different device 

configurations C-8 
5630 4973 line printer attachment 
C-6 
on defined in TERMINAL statement 

S-97 
5719-AM3 (see Indexed Access 
Method) 
on 5719-A5A (see Macro Assembler) 
5719-CB3 (see COBOL) 
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